カットとペーストがうまくいかない【VBA】

環境

Windowsの仕様

エディション:Windows 10 Pro

バージョン:20H2

経緯

VBAでカット、ペーストの処理を使いたいのでうまくいきませんでした。

なので、今回はカットとペーストについて勉強してみました。

「Exit For」を使う。

まずはプログラムを書きますね。

Range("A2:D4").Cut
ActiveSheet.Paste Destination:=Range("A10")
Application.CutCopyMode = False

1行目、セルA2からD4を切り取ります。

2行目、セルA10に貼り付けます。

3行目、コピーした内容を無効にしています。

これでできました。

参考にしてください。

ここまで読んでいただきありがとうございました。