Excel使用macros复制粘贴值

我需要将单元格值从一个单元格复制到其他单元格。

这是代码工作

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 Destination:=Sheets("Sheet1").Range("B12").Pastespecial xlPasteValues End Sub 

也许:

 Private Sub CommandButton2_Click() Range("K5").Copy Sheets("Sheet1").Range("B12").PasteSpecial xlPasteValues End Sub 

select是没有必要的。