为单元格位置创建变量

Question

我需要为此单元格复制/粘贴的起始位置创建一个变量,因此我可以将其用作其他数据的参考点.那可能吗？我不确定语法.

wbkCS.Worksheets("Cut Sheet").Range("S4:S2000").Copy

With wbkVer.Worksheets("Cutsheets")
   .Range("A" & .Rows.Count).End(xlUp).Offset(1).PasteSpecial xlPasteValues
End With

Answer 1

以下是将这些范围保存为Range对象的语法.

dim firstRange as Range, secondRange as Range

set firstRange = wbkCS.Worksheets("Cut Sheet").Range("S4:S2000")

firstRange.copy

With wbkVer.Worksheets("Cutsheets")
    set secondRange = .Range("A" & .Rows.Count).End(xlUp).Offset(1)
    secondRange.PasteSpecial xlPasteValues
End With

如果你想要其中一个范围的第一个单元格,它将是这样的:

firstRange.Cells(1,1)