Excel VBAマクロ - セルをコピーして有効なセル範囲に値を貼り付けます。

Question

このExcelマクロでいくつかの問題が発生しています。

さまざまなセルをコピーしてコピーし、それらの値をアクティブセルとその下のセルに貼り付けたいと思います。

たとえば、現在セルD2が選択されています。マクロを実行するときにコピーしたい値はA1、B4、C3です。マクロを実行すると、これらのセルの値をセルD2、D3、D4にそれぞれペーストする必要があります。

このコードのヘルプは大歓迎です！

Answer 1

D2は次のようになります。

D3が使用する

Selection.Value = ActiveSheet.Range("A1").Value 

OFFSET：

Selection.Offset(1).Value = ActiveSheet.Range("B4").Value 

だから、D4：

Selection.Offset(2).Value = ActiveSheet.Range("C3").Value