あるセルから別のセルにセル値をコピーする必要があります。
これが機能したコードです
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
注:
Selects は必要ありません。
Private Sub CommandButton2_Click()
Range("K5").Copy Destination:=Sheets("Sheet1").Range("B12").Pastespecial xlPasteValues
End Sub