当サイトの記事にはプロモーションが含まれています。

Word VBAでクリップボードにコピーする方法とは?初心者でもできる簡単マクロ解説

パソコンパソコン・スマホ教室
スポンサーリンク

Wordで文書を作成していると、コピー&ペーストを繰り返す作業が面倒に感じることがありますよね。そんなとき、VBA(Visual Basic for Applications)を使って、クリップボードに自動でコピーするマクロを作成すれば、作業効率が格段にアップします。今回は、初心者の方でもわかりやすく、実際に使えるコードとともに解説します。

スポンサーリンク

VBAでクリップボードにコピーする基本のコード

Wordのイメージ

Wordのイメージ

まずは、VBAでクリップボードにテキストをコピーする基本的なコードをご紹介します。

Sub CopyToClipboard()
Dim cb As Object
Set cb = CreateObject("MSForms.DataObject")
cb.SetText "こんにちは、Word VBA!"
cb.PutInClipboard
End Sub

このコードを実行すると、クリップボードに「こんにちは、Word VBA!」というテキストがコピーされます。これで、他のアプリケーションに貼り付ける準備が整いました。

クリップボードの内容を取得する方法

次に、クリップボードに保存されているテキストをVBAで取得する方法をご紹介します。

Sub GetFromClipboard()
Dim cb As Object
Set cb = CreateObject("MSForms.DataObject")
cb.GetFromClipboard
MsgBox cb.GetText
End Sub

このコードを実行すると、クリップボードに保存されているテキストがメッセージボックスで表示されます。これを応用すれば、クリップボードの内容をWord文書に貼り付けたり、他の処理に利用することができます。

クリップボードを使ったデータ処理の応用例

VBAを使って、クリップボードの内容を加工したり、特定の条件で処理を行うことも可能です。例えば、クリップボードの内容を行単位で分割し、特定の文字列を含む行だけをWord文書に貼り付けるマクロを作成することができます。

Sub PasteFilteredData()
Dim cb As Object
Set cb = CreateObject("MSForms.DataObject")
cb.GetFromClipboard
Dim data As String
data = cb.GetText
Dim lines() As String
lines = Split(data, vbCrLf)
Dim i As Integer
For i = 0 To UBound(lines)
If InStr(lines(i), "特定の文字列") > 0 Then
Selection.TypeText lines(i) & vbCrLf
End If
Next i
End Sub

このマクロでは、クリップボードの内容を行単位で分割し、「特定の文字列」を含む行だけをWord文書に貼り付けています。業務で大量のデータを処理する際に、非常に便利なテクニックです。

よくある質問や疑問

Q1: VBAでクリップボードを操作するには、どの参照設定が必要ですか?

VBAでクリップボードを操作するには、「Microsoft Forms 2.0 Object Library」を参照設定に追加する必要があります。VBE(Visual Basic Editor)で「ツール」→「参照設定」から追加できます。

Q2: クリップボードにコピーした内容を、Word文書に貼り付けるにはどうすればよいですか?

クリップボードの内容をWord文書に貼り付けるには、以下のコードを使用します。

Sub PasteFromClipboard()
Dim cb As Object
Set cb = CreateObject("MSForms.DataObject")
cb.GetFromClipboard
Selection.TypeText cb.GetText
End Sub

このコードを実行すると、クリップボードの内容がカーソル位置に貼り付けられます。

Q3: VBAでクリップボードの内容を加工する際の注意点はありますか?

VBAでクリップボードの内容を加工する際は、以下の点に注意してください。

ここがポイント!

  • クリップボードの内容がテキスト形式であることを確認してください。
  • 改行コード(vbCrLf)を適切に処理することで、行単位での分割や結合がスムーズに行えます。
  • クリップボードの内容を変更する前に、必要なデータをバックアップしておくことをおすすめします。

まとめ

VBAを使ってクリップボードを操作することで、日々の作業を効率化することができます。基本的なコピー&ペーストから、データの加工やフィルタリングまで、さまざまな応用が可能です。ぜひ、今回ご紹介したコードを参考に、自分の業務に役立つマクロを作成してみてください。

この記事を書いた人
この記事を書いた人

企業の情報システム部門で10年以上、PC・アカウント・社内ネットワーク・Microsoft 365/Google Workspace運用を担当。年間数百件の問い合わせ対応(PC不調、メール送受信、Excel/Word資料、Teams会議、スマホ連携など)を通じて、初心者がつまずくポイントを「再現→原因切り分け→最短解決」の手順に落とし込んできました

現場や身近で実際に起きたトラブルをベースに、手順だけでなく「なぜそうなるか」「失敗しやすい落とし穴」「安全な設定(セキュリティ)」まで含めて解説します。

uri uriをフォローする
スポンサーリンク
よかったらシェアしてね! /
uri uriをフォローする

コメント

タイトルとURLをコピーしました