帮我写一个VBA代码,我想从sheet5中选中A2和A3单元格,将选定区域填充至A列的最后一行,最后一行的位置等于C列最后一个有内容元素的位置
时间: 2024-05-07 09:17:34 浏览: 64
好的,根据您的要求,以下是VBA代码:
```
Sub FillSelectionToLastRow()
Dim lastRow As Long
lastRow = Worksheets("Sheet5").Cells(Rows.Count, "C").End(xlUp).Row
Range("A2:A3").Select
Selection.AutoFill Destination:=Range("A2:A" & lastRow), Type:=xlFillDefault
End Sub
```
这段代码可以自动选中Sheet5中的A2和A3单元格,并将此区域填充至A列的最后一行。具体位置是基于C列中最后一个有内容元素的位置来确定的,不必手动输入。
阅读全文