DeleteAllComments 方法

       

删除文档中 Comments 集合中的所有备注。

expression.DeleteAllComments

expression   必需。该表达式返回“应用于”列表中的一个对象。

说明

使用 Add 方法为 Comments 对象在文档中添加备注。

示例

本示例删除活动文档中的所有备注,本示例假定活动文档中有备注。

Sub DelAllComments()
    ActiveDocument.DeleteAllComments
End Sub