アクティブなブックのすべてのコメントを削除する、Excelマクロをご紹介しました。
Wordの場合は、もっと簡単なコードですべてのコメントを削除することができます。
すべてのコメントを削除するサンプルマクロ
Wordの場合はループを回さなくても、文書内のすべてのコメントを削除できるのです。
ActiveDocument.DeleteAllComments
End SubWordの場合、DocumentオブジェクトにDeleteAllCommentsというメソッドが用意されています。DeleteAllCommentsという名前のとおり、すべてのコメントを削除するメソッドです。
Wordにはコメントを一括削除するコマンドが用意されています。このコマンドに対応したメソッドなのでしょう、DocumentオブジェクトのDeleteAllCommentsメソッドは。
しかし、コメントの一括削除はマクロ記録を行っても、残念ながら、適切なコードが作成されません。
オブジェクトブラウザを使えばDocument.DeleteAllCommentsメソッドはみつかる
なのですが、、VBE(Visual Basic Editor)のオブジェクトブラウザで「comment」を検索して検索結果を眺めると、DeleteAllCommentsメソッドの存在に気づくことができます。
ちなみに、オブジェクトブラウザでExcelライブラリを対象にして「comment」を検索しても、WordのDeleteAllCommentsに該当するメソッドはみつかりません。
存在しているのは既にご紹介している、RangeオブジェクトのClearCommentsメソッドです。
- Newer:IMEの予測変換候補が表示されるタイミング
- Older:コメントを一括削除するExcelマクロ
Home » ワードマクロ・Word VBAの使い方 » 変更履歴・コメント » すべてのコメントを削除するWordマクロ