VBAを使用してクリップボードからExcelに貼り付ける方法

  • これを共有
Hugh West

テキストや画像をカットまたはコピーすると、まずクリップボードに保存されます。 その後、WordファイルやExcelファイルなど、任意の場所にテキストや画像を貼り付けることができます。 Excelでは、クリップボードからさまざまな方法で貼り付けることができます。 Microsoftを使用する ビジュアルベーシックアプリケーション(VBA) を使うと、クリップボードからいくつかのコードを使ってExcelファイルに貼り付けることができます。 今回は、その3つの方法を紹介します。 ブイビーエー をクリックすると、クリップボードからExcelに貼り付けることができます。

仮に、あなたが 丸写し テキストファイルから取得したデータをクリップボードに保存しておき、それをExcelファイルに貼り付けるには ブイビーエー .

練習用ワークブックをダウンロードする

クリップボードからExcelに貼り付ける.xlsm

VBAでクリップボードからExcelに貼り付ける3つの方法

1.VBAによるクリップボードからの単一セルへの貼り付け

この方法を適用する前に、アクティベーションを行う必要があります。 Microsoft Forms 2.0 オブジェクトライブラリ に対して ブイビーエー そのためのプロジェクトです。

➤ プレス ALT+F11 を開くと ブイビーエー

➤へ移動します。 ツール> リファレンス において ブイビーエー ウィンドウに表示されます。

を開くことになります。 参考:VBAProject ウィンドウに表示されます。

➤チェック Microsoft Forms 2.0 オブジェクトライブラリ をクリックしてください。 よっしゃー .

起動することになります。 Microsoft Forms 2.0 オブジェクトライブラリ ... 今すぐ

をクリックします ➤。 インサート タブを選択し モジュール .

を開くことになります。 モジュール(コード) ウィンドウに表示されます。

➤ 次のコードを モジュール(コード) ウィンドウに表示されます。

 Sub Paste_from_Clipboard() Dim CObj As MSForms.DataObject Set CObj = New MSForms.DataObject CObj.GetFromClipboard XText = CObj.GetText(1) ActiveSheet.Range("B4").Value = XText End Sub. 

このコードでは マクロ で、クリップボードにあるテキストをセル B4 .

コードを挿入した後

をクリックします ➤。 実行 アイコンをクリックするか F5 .

今すぐ

➤ 閉じるまたは最小化します。 ブイビーエー ウィンドウに表示されます。

クリップボードのテキストがセルに貼り付けられているのがわかります。 B4 .

続きを読む エクセルで数式を使わずにコピー&ペーストする方法(簡単な7つの裏ワザ)

類似の読み物

  • エクセルで一意な値を別のワークシートにコピーする方法(5つの方法)
  • Excelでマージとフィルタリングされたセルをコピーする(4つの方法)
  • エクセルで行をコピーする方法(4つの簡単な方法)
  • Excelで数千の行をコピー&ペーストする(3つの方法
  • Excelで正確な書式をコピー&ペーストする方法(クイック6メソッド)

2.クリップボードからの貼り付け by SendKeys

この方法は、ショートカットキー CTRL+V で、データの貼り付けに使用されます。 ブイビーエー のコードでは、このコマンドを使ってクリップボードからデータを貼り付けることができます。 まずは

からシート名を右クリック ➤ シート名を右クリック プロジェクト のパネルがあります。 ブイビーエー ウィンドウに表示されます。

ドロップダウンメニューが表示されます。

➤ 拡大する インサート をクリックし、選択します。 モジュール .

を開くことになります。 モジュール(コード) ウィンドウに表示されます。

➤ 次のコードを モジュール(コード) ウィンドウに表示されます。

 Sub Paste_from_Clipboard_2() ActiveSheet.Range("B4").Select SendKeys "^v" End Sub 

このコードでは マクロ 名前付き クリップボードから貼り付け 2 というコマンドがあります。 CTRL+V セル選択後 B4 をクリックし、クリップボードからこのセルにデータを貼り付けます。

今すぐ

➤ 閉じるまたは最小化します。 ブイビーエー ウィンドウに表示されます。

➤ プレス ALT+F8

を開くことになります。 マクロ ウィンドウに表示されます。

➤ 選択する クリップボードから貼り付け 2 において マクロ名 ボックスをクリックし 実行 .

その結果、クリップボードにあるテキストがセル B4 .

続きを読む 値のみをコピー先にコピーするExcel VBA(マクロ、UDF、UserForm)

3.クリップボードから範囲指定で貼り付け

このメソッドでは、次のような方法を紹介します。 書き取る をクリップボードにコピーし、そのデータをクリップボードから別のシートに貼り付けることができます。

という名前のシートに、次のようなデータセットがあるとします。 データ .

今すぐ

➤ プレス ALT+11 を開いてください。 ブイビーエー ウィンドウに表示されます。

からシート名を右クリック ➤ シート名を右クリック プロジェクト のパネルがあります。 ブイビーエー ウィンドウに表示されます。

ドロップダウンメニューが表示されます。

➤ 拡大する インサート をクリックし、選択します。 モジュール .

を開くことになります。 モジュール(コード) ウィンドウに表示されます。

➤ 次のコードを モジュール(コード) ウィンドウに表示されます。

 Sub Copy_Clipboard_Range() Worksheets("Data").Range("B4:E9").Copy ActiveSheet.Paste Destination:=Worksheets("Paste sheet").Range("B5:E10") End Sub 

からデータをコピーするコードです。 B4:E9 という名前のシートの データ のデータをクリップボードに貼り付けます。 B5:E10 というシートの 貼り付けシート をクリップボードから取得します。

その後です。

➤ 閉じるまたは最小化します。 ブイビーエー ウィンドウに表示されます。

➤ プレス ALT+F8

を開くことになります。 マクロ ウィンドウに表示されます。

➤ 選択する Copy_Clipboard_Range において マクロ名 ボックスをクリックし 実行 .

その結果、データは目的の場所に貼り付けられることになります。

➤ に進みます。 ホーム タブの左下にある小さな下向き矢印のアイコンをクリックします。 クリップボード リボン

Excelファイルの左側にあるクリップボードを開きます。

シートに貼り付けたデータがクリップボードにあるのがわかりますね。 実は、最初にここにデータを保存して、ここからシートに貼り付けているんです。

続きを読む エクセルで値をコピー&ペーストする公式(5例)

結論

この記事では、クリップボードからExcelに貼り付けるための3つの方法をご紹介します。 ブイビーエー 最初の2つの方法は、1つのセルにクリップボードの内容を貼り付けるものですが、3番目の方法では、範囲内のデータを貼り付けることができます。 もし、分かりにくい点があれば、お気軽にコメントを残してください。

Hugh West は、業界で 10 年以上の経験を持つ、非常に経験豊富な Excel トレーナー兼アナリストです。彼は会計と財務の学士号と経営管理の修士号を取得しています。ヒューは教えることに情熱を持っており、理解しやすい独自の教育アプローチを開発しました。彼の Excel に関する専門知識は、世界中の何千人もの学生や専門家がスキルを向上させ、キャリアで優れた成果を上げるのに役立ってきました。 Hugh はブログを通じて知識を世界に共有し、個人や企業が潜在能力を最大限に発揮できるよう無料の Excel チュートリアルとオンライン トレーニングを提供しています。