vba - 范围 - 更改引用

Question

我有这个代码:

Public Sub test()
    Dim Tgt As Range
    Set Tgt = Range("A1")
End Sub

我想更改当前为“A1”的 Tgt 的引用，我只想更改列，而不是行，但我不想再次设置 Range("XX")。

还有其他方法可以更改 Tgt 的列吗？

如果我做 Tgt.Column = 3，这是不可能的。

Answer 1

如您所见，Tgt.Column = 3不会工作。这是因为 Column Range 的属性(property)对象是只读的，所以你不能设置它的值，你只能读取/获取它。

看看 Range.Offset(RowOffset, ColumnOffset) .

在你的情况下，它会是这样的:

Set Tgt = Range("A1").Offset(0, 2)

为了抵消您称为 Tgt 的范围由 0 向下行 2 右侧的列，即在同一行中且来自列 一个 到列 中号 ，导致单元格 C1 .

注意 Range.Offset 的正参数分别向下(对于行)和向右(对于列)偏移。负参数将向相反方向偏移。