Sub Macro1()
n = [a65536].End(3).Row
Selection.AutoFill Range(Selection.Address, Cells(n, Selection.Column))
End Sub
向下填允选中的单元格
n = [a65536].End(3).Row
Selection.AutoFill Range(Selection.Address, Cells(n, Selection.Column))
End Sub
向下填允选中的单元格
---------------------------
可以你想填充到第几行就把65536改成那行的行数