Document.DeleteAllComments (Word)
Elimina todos los comentarios de la colección Comments de un documento.
Utilice el método Add para el objeto Comments para agregar un comentario a un documento.
Sub DelAllComments()
ActiveDocument.DeleteAllComments
End Sub