vbscript - 使用 Vb 脚本在 Excel 中创建命名范围

Question

我创建了一个代码，用于使用 Range 对象在 Excel 中创建命名范围，但没有像在 VBA 中那样工作。错误出现在我尝试创建 Range 对象的语句中，不确定如何做到这一点。

如果有人可以建议我一个想法，那就太好了。

Set Exobj = CreateObject("Excel.Application")
Set Newbook = Exobj.Workbooks.Add()
Newbook.SaveAs("C:\Users\ACER\Desktop\Project Folder\Test17.xlsx")

Exobj.Workbooks.Open("C:\Users\ACER\Desktop\Project Folder\Test17.xlsx")
Exobj.Visible = True

Set Myrange = Exobj.Worksheets(sheets1).Range("A1:H11") ' statement where Error comes

For each C in Myrange
If c.Value = "" Then 
C.Value ="Blank"
End if
Next

Exobj.Workbooks.Save()
Exobj.Activeworkbooks.Close()

Answer 1

我认为你需要sheets1用引号括起来，即

Set Myrange = Exobj.Worksheets("sheets1").Range("A1:H11")