将单元格向下填充到相邻列不是从顶行开始的最后一个单元格

Question

我正在尝试将公式填充到相邻列的底部单元格中。特别是将列A填充到B列中的底行。我可以使用以下代码实现此目的：

LastRow = Range("B" & Rows.Count).End(xlUp).Row
Range("A2").AutoFill Destination:=Range("A2:A" & lastRow)

问题在于，当文件更新时，我需要起点（从中填充）为动态。第一次运行该文件时，上述代码有效，因为该文件为空。第二次，但是列A可能有数据到行100，列B可能有数据到200.所以我不能让FillDown从A2开始。它需要从A列中的第一个空单元开始（在A列中从不存在空单元格，直到数据的底部）。

如何让起点也动态？

本准则：

Range("A" & Rows.Count).End(xlUp).Offset(1).Select

当列中已有数据但我似乎无法将其与现有代码联系起来时，选择我正在寻找的“起点”。

谢谢！

Answer 1

Client  Value_01   Value_02   Date
ABC     100       500       2016-09-01T
DEF     95        1000      2016-09-01T

Answer 2

如果您只想填写公式：

Range("A2:A" & Range("B" & Rows.Count).End(xlUp).Row).FillDown