[英]Unable to set excel VBA worksheet variable
我试图将源工作表变量设置为另一个工作簿(DataSource1.xlsx)中的目标工作表变量,目的是最终使用它来读取目标工作表并执行一些计算,但是它给我下标超出范围的错误。
这是我的代码
Sub GenerateReport()
Dim source As Worksheet
Dim path As String
Set source= Workbooks(ThisWorkbook.path & "\DataSource1.xlsx").Sheets("Sheet1")
'path = ThisWorkbook.path
'Set wb = Workbooks.Open(ThisWorkbook.path & "\DataSource1.xlsx")
Dim one As Integer
one = 10
End Sub
该文件都放在同一个文件夹中,并且我检查了是否没有命名或路径错误,为什么会这样?
编辑
这是我的项目在GSerg评论后的样子
如果工作簿已经打开,则需要按名称而不是路径进行引用:
Set source = Workbooks("DataSource1.xlsx").Sheets("Sheet1")
如果尚未打开工作簿,则需要先打开它:
Set source = Workbooks.Open(ThisWorkbook.path & "\DataSource1.xlsx").Sheets("Sheet1")
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.