从variables起始行填写

我不知道如何从variables行填写。 例如,有时从40000开始,有时从50000开始。

这就是现在的样子

Selection.End(xlUp).Select Selection.AutoFill Destination:=Range("A40958:A43550") Range("A40958:A43550").Select 

我知道如何填写到最后一行,但我不知道如何获得第一个数字也是可变的。 在A列我去到最后一个单元格,然后填写。 我如何expression?

自动.AutoFill ,使用Range.FillDown方法,通过定义范围的开始和结束边界,就像select单元格并点击Ctrl + D一样

 dim rw as long rw = 40000 with activesheet .range("A" & rw, "A" & .cells(rows.count, "B").end(xlup).row).FillDown end with 

这将填满从行40000到列B的范围(最后使用的单元格)。