Excel VBA クリップボード操作でデータのコピーや貼り付けを自動化

以下のようなシーンで利用されます。

・Excelのデータを他のアプリケーションにコピーして貼り付ける。

・特定の範囲を選択して、他のシートやファイルに簡単にデータを移動させたいとき。

・ユーザーに手動でコピー＆ペーストをさせるのではなく、マクロで自動的にクリップボード操作を行う。

Excel VBA クリップボード操作｜使い方とポイント

Option Explicit

Sub CopyToClipboard()
    Dim ws As Worksheet
    Dim rng As Range

    ' コピー元のシートと範囲を設定
    Set ws = ThisWorkbook.Sheets("Sheet1")
    Set rng = ws.Range("A1:C10") ' 例: A1からC10の範囲をコピー

    ' クリップボードにコピー
    rng.Copy

    ' コピー先のシートを設定
    ThisWorkbook.Sheets("Sheet2").Activate
    Range("A1").Select

    ' クリップボードの内容を貼り付け
    ActiveSheet.Paste

    ' コピーの選択解除
    Application.CutCopyMode = False
End Sub

ExcelVBAでクリップボードを操作することで、データのコピー＆ペースト作業を自動化でき、作業の効率化が図れます。特に、他のシートやアプリケーションにデータを移動する際に役立つため、手作業を減らし、ミスを防ぐのに有効です。