为文档(该文档以被发送出去进行审阅)的作者发送电子邮件,通知他们审阅者已经审阅完文档。
expression.ReplyWithChanges(ShowMessage)
expression 必需。该表达式返回一个 Document 对象。
ShowMessage Variant 类型,可选。如果为 True,则在发送前显示邮件;如果为 False,则自动发送邮件,而不先显示它。默认值为 True。
可用 SendForReview 方法开始对文档进行合作审阅。如果对不是合作审阅循环中的一部分的文档执行 ReplyWithChanges 方法,Microsoft Word 就会显示错误消息。
本示例发送一条信息,通知作者审阅者已经完成审阅(而不先向审阅者显示该电子邮件)。本示例假定当前文档是合作审阅循环中的一部分。
Sub ReplyMsg()
ThisDocument.ReplyWithChanges ShowMessage:=False
End Sub