共用方式為


Word) (Comment.Scope 屬性

會傳回代表指定的註解所標示的文字範圍的 Range 物件。

語法

expressionScope

表達 會傳回 'Comment' 物件的運算式。

範例

本範例會顯示與選取範圍中第一個註解相關的文字。

If Selection.Comments.Count >= 1 Then 
 Set myRange = Selection.Comments(1).Scope 
 MsgBox myRange.Text 
End If

本範例會複製與使用中文件裡最後一個註解相關的文字。

total = ActiveDocument.Comments.Count 
If total >= 1 Then ActiveDocument.Comments(total).Scope.Copy

另請參閱

Comment 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應