Excel VBA将活动单元格设置为范围

Question

使用VBA我使用以下

选择列中的第一个空单元格

Range("A3").End(xlDown).Offset(1, 0).Select

如何将此当前活动的单元格设置为稍后在宏中调用的范围。 我试过了，

Dim Target as Range
Range("A3").End(xlDown).Offset(1, 0).Select
Target = Cells(Application.ActiveCell)

如果这是一个基本问题，我道歉。

Answer 1

如果您的意思是列末尾的第一个空单元格，则这是所需的轻微变化。我建议不要使用变量名Target，因为这也是一个VBA关键字。

Dim rng As Range
Set rng = Cells(Rows.Count, "A").End(xlUp).offset(1,0)
MsgBox rng.Address

Answer 2

您不需要先选择单元格，在分配对象时，需要使用Set，如下所示：

Dim Target As Range
Set Target = Range("A3").End(xlDown).Offset(1,0)

Answer 3

这是：

Dim Target as Range
Set Target = Range("A3").End(xlDown).Offset(1, 0)