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

使用VBA我使用以下select列中的第一个空单元格

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

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

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

如果这是一个基本的问题,我很抱歉。

如果您是指列末尾的第一个空单元格,那么这就是所需的细微变化。 我会反对使用variables名称Target因为这也是一个VBA关键字。

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

您不需要首先select单元格,并且在分配对象时,需要使用Set

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

这里是:

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