如何将E2:AJ11中的值粘贴到另一个工作表上的活动单元格中?
即。用户在Worksheet2上选择一个单元格> VBA从工作表1复制E2:AJ11并将所有内容过去到该单元格中。
以下VBA将从A1开始的所有内容都放到了Worksheet2中,但我需要将它粘贴到活动单元格中。
Sub Paste()
Worksheets("WS1").Range("E2:AJ11").Copy Destination:=Cells(ActiveCell.Row + 1, 1)
End Sub
非常感谢!
答案 0 :(得分:3)
选择要粘贴的单元格,然后按按钮。
代码将在末尾复制ActiveCell,即
Worksheets("WS1").Range("E2:AJ11").Copy ActiveCell