我需要将单元格值从一个单元格复制到另一个单元格。
这是工作的代码
Private Sub CommandButton2_Click()
Range("K5").Select
Selection.Copy
Sheets("Sheet1").Select
Range("B12").Select
ActiveSheet.Paste
End Sub
需要将 K5 单元格数据复制到 sheet1 b12 吗?
也许:
Private Sub CommandButton2_Click()
Range("K5").Copy
Sheets("Sheet1").Range("B12").PasteSpecial xlPasteValues
End Sub
注意:
选择不是必需的。
Private Sub CommandButton2_Click()
Range("K5").Copy Destination:=Sheets("Sheet1").Range("B12").Pastespecial xlPasteValues
End Sub