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

予めExcelの内容をコピーし、
Wordのマクロでテキスト部分だけWordに貼り付ける方法は分かりました。
（Selection.PasteAndFormat wdFormatPlainText）

しかし、貼り付けるクリップボードの内容を
マクロの変数に読み込む方法が分かりません。
検索してもExcelに関するものばかりでした。
Wordではできないのでしょうか？

ご教授ください。
お願いします。

No.1 ベストアンサー 回答者： enunokokoro 回答日時： 2019/10/12 22:19

MSの記事だったと思うけど（今はない？）。

以前に覚書としてメモしてあったものです。
こちら↓で変数にすることは可能だと思います。

[ Microsoft Forms 2.0 Object Library ]を[参照設定]。
http://www.tomodachihiroba.org/2016/01/vbe-micro …
設定できたら、以下のマクロを実行します。

Sub GetClipBoardText()
　Dim MyData As DataObject
　Set MyData = New DataObject
　Dim sClipText As String　' この変数が内容になる

　On Error GoTo NotText
' Get data from the clipboard.
　　MyData.GetFromClipboard
' Assign clipboard contents to string variable.
　　sClipText = MyData.GetText(1)
　　　MsgBox sClipText
　NotText:
　　If Err <> 0 Then
　　　MsgBox "Data on clipboard is not text."
　　End If
End Sub

この回答へのお礼

返信が遅くなって申し訳ありません。
Wordのマクロではなく、Excelのマクロに関する情報でした。
わざわざメモを探してご回答下さり、有難うございました。

お礼日時：2019/10/16 04:52