首先,我知道这个问题已经有人问过了,但我不太擅长vba,所以我恳请您的帮助,因为我无法实现我找到的解决方案。
所以我不得不列出"alfa“和"beta”。我需要将范围B2:E2复制到空的B。然后将其复制到列B的第一个空行。
最后一个空格和第一个空格总是不同的..
非常感谢您的帮助!
发布于 2019-03-18 21:25:54
试一试:
Sub Kopy()
Dim N As Long, r1 As Range, r2 As Range
N = Cells(Rows.Count, "B").End(xlUp).Row
Set r1 = Range("B2:E" & N)
Set r2 = Range("B" & (N + 1))
r1.Copy r2
End Sub备注:
我们只需要在目标区域中指定一个单元格。
格式和值都将被复制。
https://stackoverflow.com/questions/55222337
复制相似问题