
Sub 範囲コピーと削除の2処理()
Range("A1:B2").Copy Range("D1:E2")
Range("G1:H2").ClearContents
End Sub

Sub 範囲コピーと削除の2処理()
Range("A1:B2").Copy Range("D1:E2")
Range("G1:H2").ClearContents
End Sub
Range("A1:B2").Copy Range("D1:E2")Destinationを使わずに一行で記述して簡潔にしたど。Range("G1:H2").ClearContentsおらの村じゃ、パソコンなんてのは都会のもんだと思ってたんだっぺ。でもな、ある日役場の若ぇもんが「じっちゃん、Excelで収穫記録つけてみましょう」って言ってきたんだわ。最初は「エクセル?それ、畑の肥料かなんかか?」って思ったけんど、違ったんだわ。そしたら今度は「VBAってのが便利です」って言われてよ。 VBAっつーのは、Excelの中で使える魔法みてぇなもんで、ボタン押すだけで仕事がパパッと終わっちまうんだと。まるで村の祭りで餅投げしたら、空から帳簿が降ってくるみてぇなもんだっぺ! でもな、今の若ぇもんは「VBAはレガシーだ」とか言って、PythonだのPower Automateだの、横文字ばっか使ってるんだわ。おらからすりゃ、VBAはまだまだ現役。レガシー村のいきのこりとして、しぶとく生きてるんだっぺ! たとえば、こんなコードがあるんだわ: Sub 畑の収穫記録( ) Dim i As Integer For i = 2 To 10 Cells(i, 1).Value = “じゃがいも” Cells(i, 2).Value = Date + i Cells(i, 3).Value…