Excel - VBA合并单独工作表上的单元格

Question

我已将表单1激活，并且我尝试对表单2中的某些单元格执行合并操作，但我正在获取＆＃39;方法＆＃39;对象范围＆＃ 39; _Worksheet＆＃39;失败＆＃39;＆＃39;错误。

do

但是，如果我事先插入Dim rawData As Worksheet For i = 2 To 12 Step 2 rawData.Range(Cells(2, i), Cells(2, (i + 1))).Merge Next i 行，它确实有效。有没有办法在不先激活表单的情况下完成此操作？

Answer 1

没有合格工作表的范围/单元格总是引用活动表格（除非在工作表代码模块中，它们引用该工作表）。

应尽可能避免使用/依赖默认行为（即依赖于代码运行时某个工作表处于活动状态）。

Dim rawData As Worksheet

With RawData
    For i = 2 To 12 Step 2
        .Range(.Cells(2, i), .Cells(2, (i + 1))).Merge
    Next i
End With