使用Vb腳本在Excel中創建命名範圍

我創建了一個用於在Excel中使用Range對象創建命名範圍的代碼，但因爲它在VBA中工作，所以無法工作。錯誤發生在聲明中，我嘗試創建一個Range對象，不知道如何做到這一點。使用Vb腳本在Excel中創建命名範圍

如果任何人可以建議我一個想法它會很好。

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()

來源

2013-02-25 user1925406

我認爲你需要圍繞'加上引號sheets1'，即'設置Myrange = Exobj.Worksheets（「sheets1」）。範圍（「A1：H11」）' – 2013-02-26 00:43:56

比你，它的工作。 – user1925406 2013-02-26 02:42:17

我會發表我的評論作爲答案，歡呼;） – 2013-02-26 17:06:37

我認爲你需要圍繞sheets1加上引號，即

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

來源

2013-02-26 17:07:25

使用Vb腳本在Excel中創建命名範圍

回答

相關問題