对象variables未设置错误简单代码

我想在excel-vba中写一个“PERSONAL.XLSB”的macros。 我正在从一个打开的工作簿检索一个范围，后来我想遍历该范围。

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

但它不断向我展示

运行时错误“91”对象variables或未设置块variables

如何解决这个问题？

Answer 1

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

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

更多信息： Set语句（Visual Basic）