有一个宏将完整列复制到另一个工作表 .
目前，我需要一个宏来仅复制最后一行数据
示例，如果我有以下内容：
单元格A1 = 1，单元格A2 = 2，单元格A3 = 3，单元格A4 =总和（A1：A3），单元格A5 =空白
我希望宏只复制A4 . 我正在为整个列（A到E）做这个谢谢
有人已经帮助我使用下面的代码，它将所有数据复制到最后一行，不包括最后一行 . 我需要它做相反的事情，只复制最后一行
Dim lrow As Long
With wbk4.Sheets("Sheet1")
lrow = .Range("A" & .Rows.Count).End(xlUp).Row
.Range("A1", "E" & lrow - 1).Copy
wbk2.Sheets("Sheet1").Range("XD1").PasteSpecial xlPasteAll
End With
1 回答
只需通过快速检查代码，它会是：
变成：