範囲に追加するコメントを表す Comment オブジェクトを返します。
構文
式。追加 (範囲、 テキスト)
expression 必須です。 'Comments' コレクションを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
Range | 必須 | Range object | コメントを追加する範囲を指定します。 |
Text | 省略可能 | バリアント型 (Variant) | コメントの文字列を指定します。 |
戻り値
コメント
例
次の使用例は、カーソル位置にコメントを追加します。
Sub AddComment()
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Comments.Add _
Range:=Selection.Range, Text:="review this"
End Sub
次の使用例は、作業中の文書の 3 番目の段落にコメントを追加します。
Sub Comment3rd()
Dim myRange As Range
Set myRange = ActiveDocument.Paragraphs(3).Range
ActiveDocument.Comments.Add Range:=myRange, _
Text:="original third paragraph"
End Sub
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。