VBA外部工作簿中用Cells()定义Range()失败的原因有哪些？

在尝试定义外部工作簿内的单元格区域时，Range()有时无法接收Cells()作为参数，例如执行如下代码时：

Set range = Workbooks("<Workbook>").Sheets("<Worksheet>").Range(Cells(1,2), Cells(3,2))

会返回运行时错误：

Run-time error '1004' Application-defined or object-defined error

如果改用Range("B1:B3")的字符串传参方式定义区域，错误就会消失。

• Cells()未绑定到目标工作表，跨对象调用冲突
  这是该问题最高发的原因：代码中Range()方法明确绑定了外部工作簿的指定工作表，但作为参数传入的两个Cells()方法没有加任何对象限定，VBA会默认将其解析为当前活动工作表的单元格对象。相当于你拿属于工作表B的单元格对象，作为参数传给工作表A的Range()方法来生成区域，跨工作表传Range参数会直接触发1004错误。
  这也是问题表现为“有时失效”的核心原因：如果代码运行时刚好激活的是目标外部工作表，Cells()和Range()属于同一个工作表，代码就可以正常运行；一旦活动工作表切到其他工作表（包括当前代码所在的工作簿的其他表），立刻触发错误。
  对应的正确写法需要把Cells()也绑定到同一个目标工作表对象：

  Dim targetSht As Worksheet
  Dim targetRng As Range
  Set targetSht = Workbooks("<Workbook>").Sheets("<Worksheet>")
  Set targetRng = targetSht.Range(targetSht.Cells(1, 2), targetSht.Cells(3, 2))
  

• 目标工作簿/工作表处于不可访问状态
  当你引用的外部工作簿未打开、处于受保护视图锁定状态，或者目标工作表被设置为xlSheetVeryHidden深度隐藏、工作表开启了保护模式限制单元格读取时，调用Cells()读取单元格对象会失败，进而触发1004错误。而使用Range("B1:B3")传参时，是直接把地址字符串传给目标工作表的Range方法解析，不需要提前读取单元格子对象，部分场景下不会触发访问校验失败。
• 变量/对象命名冲突导致解析异常
  示例代码中使用Range作为变量名，而Range本身是VBA的内置对象、方法名，用语言关键字作为变量名会干扰编译器的对象解析逻辑，打乱Range方法、Cells方法的调用归属关系，进而触发运行时错误。实际开发中应当避免用内置关键字命名自定义变量，可改用rng、targetRange这类无冲突的名称。

内容的提问来源于stack exchange，提问作者Diaa