2

あるセルから別のセルにセル値をコピーする必要があります。

これが機能したコードです

    Private Sub CommandButton2_Click()
Range("K5").Select
Selection.Copy
Sheets("Sheet1").Select
Range("B12").Select

ActiveSheet.Paste
End Sub

K5 セル データを sheet1 b12 にコピーする必要がありますか?

4

2 に答える 2

2

多分:

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

:

Selects は必要ありません。

于 2013-10-23T11:40:50.667 に答える
1
Private Sub CommandButton2_Click()
Range("K5").Copy Destination:=Sheets("Sheet1").Range("B12").Pastespecial xlPasteValues

End Sub
于 2015-06-27T00:35:08.590 に答える