選択したデータ行を 2 つのシート間でコピーする Excel マクロを記述するにはどうすればよいですか?

選択したデータ行を 2 つのシート間でコピーする Excel マクロを記述するにはどうすればよいですか?

私は VBA 全般の経験があまりありません。マクロの仕組みは理解していますが、これは私の手に負えません。基本的に、タイトルで述べたように、選択した行またはセルを 1 つのシートから別のシートにコピーするマクロを作成する必要があります。

たとえば、最初のシートにはデータが入ったテーブルが含まれています。ユーザーは行または目的のセルを選択し、キー ショートカットを使用してマクロを実行し、マクロは選択したデータをシート 2 にコピーして目的の行 (ここでは行 22 にします) に貼り付けます。また、行 22 (A:22) にデータがある場合は、次の行 (23) にデータを貼り付けます。

十分に明確に伝わったと思います。

どのようなヒントや助けでもいただければ幸いです。

答え1

[開発] -> [Visual Basic] で、新しいモジュールに次のコードを追加します。

Sub CopySelection()
  Dim xlSel As Excel.Range
  Set xlSel = Excel.Application.Selection

  xlSel.Copy Excel.Application.Sheets("Sheet2").Range("A1")
End Sub

次に、「開発」->「マクロ」でサブを選択し、「オプション」をクリックしてキーを割り当てます。

関連情報