対象:Word2007, Word2010, Word2013, Windows版Word2016
「word vba コメントを含むsentence」
という検索で、このサイト・インストラクターのネタ帳へのアクセスが、ありました。
コメントが含まれている文・センテンスを取得するWord VBA(Visual Basic for Applications)のコードを探している方による検索です。
「word vba コメントのrange指定」
という検索キーワードも、同じようなコードを求めていらした方のように思えます。
[スポンサードリンク]
コメントの含まれる文・センテンスを取得するサンプルマクロ
以下のようなマクロで、アクティブな文書の、コメントの含まれる文・センテンスの文字列が、メッセージボックスに順番に表示されます。
Sub コメントの含まれるセンテンスを取得する()
Dim cmt As Comment
For Each cmt In ActiveDocument.Comments
MsgBox cmt.Reference.Sentences(1).Text
Next
End Sub
Dim cmt As Comment
For Each cmt In ActiveDocument.Comments
MsgBox cmt.Reference.Sentences(1).Text
Next
End Sub
サンプルマクロのポイント
CommentオブジェクトのReferenceプロパティで、
コメントの含まれる、本文のRangeオブジェクトを取得できます。
CommentオブジェクトにはRangeプロパティも存在しますが、こちらはコメント自体のRangeオブジェクトを返すプロパティです。
[スポンサードリンク]
Home » ワードマクロ・Word VBAの使い方 » 文・センテンス » コメントの含まれる文・センテンスをWord VBAで取得する