＆＃39;未设置对象变量＆＃39;简单代码上的错误

Question

我正在尝试在＆＃34; PERSONAL.XLSB＆＃34;上写一个宏。在excel-vba中。 我正在从一个打开的工作簿中检索一个范围，后来我想循环遍历该范围。

Sub test()

Dim ran_a As Range

ran_a = Workbooks("TWE-Tool_V05_Modified.xlsm").Worksheets("Frame").Range("A1:AZ2")
end sub

然而它一直向我显示

  

运行时错误＆＃39; 91＆＃39;   对象变量或未设置块变量

如何解决问题？

Answer 1

将对象分配给对象变量时，必须使用Set语句。

请尝试：
Set ran_a = Workbooks("TWE-Tool_V05_Modified.xlsm").Worksheets("Frame").Range("A1:AZ2")

更多信息：Set Statement (Visual Basic)