vba - 如何粘贴到Excel B列的最后一行？

Question

我需要将单元格从 H2:L2 一直向下剪切并将其粘贴到 B 列的最后一行。

数据每次都会不同，因此我无法对任何范围进行硬编码。

VBA 代码会很好，从 H2:L2 向下剪切并粘贴/插入到 B 列的最后一行。

到目前为止我已经得到了。

Range("H2:L2").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Cut

Answer 1

这里是一段代码，应该可以完成您正在寻找的内容。

Start code including your cut segment...
Dim lastRow As String

lastRow = ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row + 1
Range("B" & lastRow).Select
Selection.PasteSpecial
Rest of code...

有许多书籍可以帮助您进行此类编码，并提供逐步培训。我偏爱微软出版的《Step by Step》系列。祝你好运!