是个 。在 .Cells 定义时需要在 .Range 中吗？

Question

人们普遍认为这不是“最佳实践”。

dim rng as range
with thisworkbook    '<~~ possibly set an external workbook 
    with .worksheets("sheet1")
        set rng = .range(cells(2, 1), cells(rows.count, 1).end(xlup))
    end with
end with

定义Range object 范围的两个Range.Cells 属性将默认为ActiveSheet property。如果这不是 Sheet1（定义为 With ... End With statement 中的 .Parent），则分配将失败，

Run-tim error '1004': Application-defined or object-defined error

解决方案：使用.Cells 而不是Cells。结案。

但是……

当Range.Cells 属性都继承.Parent 工作表属性（在With ... End With statement 中定义）时，此Range object 定义中是否需要.？

这怎么可能，

dim rng as range
with thisworkbook    '<~~ possibly set an external workbook 
    with .worksheets("sheet1")
        ' define rng as Sheet1!A2 to the last populated cell in Sheet1!A:A
        set rng = .range(.cells(2, 1), .cells(rows.count, 1).end(xlup))  '<~~ .range
    end with
end with
debug.print rng.address(0, 0, external:=true)

...与此不同，

dim rng as range
with thisworkbook    '<~~ possibly set an external workbook 
    with .worksheets("sheet1")
        ' define rng as Sheet1!A2 to the last populated cell in Sheet1!A:A
        set rng = range(.cells(2, 1), .cells(rows.count, 1).end(xlup))  '<~~ range not .range
    end with
end with
debug.print rng.address(0, 0, external:=true)

当定义范围范围的参数不明确时，我们使用.range；例如.range([A1]) A1 单元格可以来自任何工作表，默认为 ActiveSheet property 而没有 .。但是，当定义范围对象的范围正确引用了它的父工作表时，为什么我们需要引用它的父对象呢？

Answer 1

这里我的看法略有不同。

是这是必需的。你不能总是控制用户可以从哪里运行代码。

请考虑这几个测试用例

场景

工作簿有 2 个工作表。 Sheet1 和 Sheet2

---

测试 1（从模块运行）

两个代码给出相同的结果

测试 2（从 Sheet1 的工作表代码区域运行）

两个代码给出相同的结果

测试 3（从 Sheet2 的工作表代码区域运行）

'~~> This code fails
set rng = range(.cells(2, 1), .cells(rows.count, 1).end(xlup))

你会得到Application Defined or Object defined错误

因此始终建议正确限定您的对象，以便代码可以在任何地方运行

Answer 2

不，如果括号内的单元格引用是合格的，则不需要.，除非代码位于Worksheet 模块中。也就是说，运行 set rng = .range(.cells(...), .cells(...)) 比运行 set rng = range(.cells(...), .cells(...)) 更快，所以包含 . 会有些好处。

对于Worksheet 模块，. 是必需的。

Answer 3

答案似乎是：仅当代码位于 Worksheet 对象中时。我强烈怀疑这是因为 Worksheet 对象是唯一既可扩展又具有Range 函数的对象。当从 Worksheet 调用 Range 时，该对象的 Range 函数具有作用域。当代码位于 ThisWorkbook 或用户模块或类中时，具有最近可用范围的 Range 函数是全局 Range 对象（当然假设没有用户定义的 Range 函数）。那个绑定到Application，必须根据传递的参数解析它并将调用转发到正确的工作表。