自动向下填充宏

Question

我有这个代码

Sheets(“CE”). Select
Range(“L2:T2”). Select
Selection. Auto fill destination: =range(“L2:T83”)

我想将范围更改为 A 列中的任何内容。它应该是灵活的和自动调节的。

Selection. Auto fill destination: =range(“L2:T83”)

Answer 1

如果您在 A 列中没有任何空单元格，那么这应该可以正常工作。

Dim lRow As Long

lRow = Range("A1").End(xlDown).Row

Sheets("CE").Range("L2:T2").AutoFill Destination:=Range("L2:T" & lRow)

Macro on auto fill down