将选择的大小调整为数据的最后一行-Java 学习之路

我有一个Excel VBA宏，需要将选择从单元格 A3:K3 向下复制到列 L 中的最后一行数据 . 我有这个来获得最后一个细胞

Dim lastcell As Long
lastcell = ActiveSheet.Range("L" & cell.Count).End(xlUp).cell

我认为我必须向左偏移，将选择的大小调整为a列，然后上升到最后一行 . 可能有不同的方法这样做可能有些如何将数据的最后一行保存为选择 A3:k3 到最后一行 .

1 回答

这会将列 A 到 K 行 3 到 lastcell 复制到另一个工作表：

Sub qwerty()
    Dim lastcell As Long
    lastcell = ActiveSheet.Range("L" & Rows.Count).End(xlUp).Row
    Range("A3:K" & lastcell).Copy Sheets("Sheet2").Range("A1")
End Sub

回复于 2024-04-20T03:30:44+08:00

将选择的大小调整为数据的最后一行

1 回答

相关问题