Word VBA クリップボードから

クリップボードに入れてあるRGBデータ、たとえば（RGB(255,255,255)を取り込み、選択した図表の背景色にするようにしたWordマクロですが、Windows 7からWindows8.1へ切り替えたところ、「コンパイルエラー：ユーザー定義型は定義されていません。」となってしまいます。Windows7では正しく動いていたのですが、解決方法がわかりません。Word2007を使用しています。皆さんのソフト参考に自己流で作った内容ですが、ご教授いただければと願っています。

Sub ColorPaste()

Dim CB As New DataObject
Dim buf As String
Dim Arr As Variant
Dim R As Integer, g As Integer, B As Integer

CB.GetFromClipboard 'Clipboardから
buf = CB.GetText

buf = Mid(buf, 5, Len(buf) - 5) 'RGB(255,255,255)
Arr = Split(buf, ",") '

R = Arr(0)
G = Arr(1)
B = Arr(2)
Selection.InlineShapes(1).Fill.Visible = msoFalse
Selection.InlineShapes(1).Fill.BackColor = RGB(R, G, B)

End Sub

No.2 ベストアンサー 回答者： nicotinism 回答日時： 2015/03/13 11:41

エラー内容から

Microsoft Forms 2.0 Object Library
に参照設定されていないのでは？
一覧に出てこなければ「参照（B）」ボタンから
C:\windows\SysWow64\FM20.DLL を探して登録してください。


※昨年の１２月のOffice セキュリティ アップデートバグが
今月（3/11）のアップデートでやっと修正されました。
未適用でしたら、適用してから試された方が無難です。

※※さらに、2007でのアップデート時の注意点※※
http://blogs.technet.com/b/the_microsoft_excel_s …
で
MSOのアップデート（KB2984939）だけ※を先に適用してから
他のアップデートを行ってね！と言ってます。
『* IMPORTANT NOTE: Office 2007 differs in install list; you will need to update MSO before the other updates are applied. There is no Access patch needed for 2007.』

この回答へのお礼

nicotinism　さま
Microsoft Forms 2.0 Object Libraryを参照したら、問題が解決しました。
updateは日々していましたので、問題なかったようです。ありがとうございました。

お礼日時：2015/03/13 13:12

No.1 回答者： ShowMeHow 回答日時： 2015/03/13 11:05

他人のブログのご紹介で申し訳ありませんが、、、こんなことらしいです。

http://ameblo.jp/gidgeerock/entry-11621556349.html

この回答へのお礼

早速ありがとうございました。
ご紹介いただいた方法は私には難しそうなので、まずnicotinismさまの方法でトライしたら、問題が解決いたしました。
ご教授ありがとうございました。

お礼日時：2015/03/13 13:16