ReplyWithChanges 方法

给发送用于审阅的演示文稿的作者发一个电子邮件，通知他们审阅者已审阅完演示文稿。

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

ShowMessage  可选。Boolean 类型。值为 True 时，在发送邮件前显示该邮件。值为 False 时，自动发送邮件而不事先显示。默认值为 True。

说明

使用 SendForReview 方法启动演示文稿的协作审阅。如果 ReplyWithChanges 方法在非协作审阅流程的演示文稿中执行，用户将收到一个错误消息。

示例

本示例向审阅文档的作者发送一个邮件，通知他审阅者已完成审阅；并且在发送该邮件前不对审阅者显示该电子邮件。本示例假设当前演示文稿处于协作审阅流程中。

Sub ReplyMsg()
    ActivePresentation.ReplyWithChanges ShowMessage:=False
End Sub