現象
Word 2013 の [挿入] タブより [コメント] で挿入したコメントに対して、VBA でコメント (Word.Rectangle オブジェクト) の RectangleType プロパティを取得しようとすると、以下のエラーが表示されます。
実行時エラー '5891':
指定したオブジェクトに対して、このプロパティを使用することはできません。
状況
マイクロソフトでは、この問題について現在調査中です。詳細については、わかりしだいこの資料に掲載する予定です。
詳細
再現手順
-
Word 2013 を起動して、新規の文書を作成します。
-
[挿入] タブから [コメント] で文書にコメントを挿入します。
-
VBA エディタを開き、以下の例のようなマクロを作成します。
Sub test()
Dim rectangles As Word.rectangles
Dim rectangle As Word.rectangle
Set rectangles = ActiveWindow.Panes.Item(1).pages.Item(1).rectangles
For Each rectangle In rectanglesDebug.Print rectangle.RectangleType
Next
End Sub -
[ユーザー フォームの実行] ボタンをクリックするか、F5 キーで手順 3 で作成したマクロを実行します。
結果
以下のエラーが表示され、処理が終了します。
実行時エラー '5891':
指定したオブジェクトに対して、このプロパティを使用することはできません。
Note :
Word 2007、Word 2010 ではエラーは発生せず、正常に動作します。