用电子邮件将用于审阅的演示文稿发送给指定的收件人。
expression.SendForReview(Recipients, Subject, ShowMessage, IncludeAttachment)
expression 必选。该表达式返回“应用于”列表中的对象之一。
Recipients 可选。String 类型。列出邮件收件人的字符串。此字符串可包含电子邮件电话簿中未解析的名称和别名或完整的电子邮件地址。多个收件人之间要用分号 (;) 分隔。如果此属性值为空并且 ShowMessage 为 False,则您会收到一个错误消息,并且邮件将不能发送。
Subject 可选。String 类型。关于邮件主题的字符串。如果此属性值为空,则主题为:请审阅“文件名”。
ShowMessage 可选。Boolean 类型。该 Boolean 类型值指出执行此方法时是否显示邮件。默认值为 True。如果设置为 False,则邮件将自动发送给收件人,而不先给发件人显示该消息。
IncludeAttachment 可选。Variant 类型。该 Boolean 类型值指出邮件是否应包含附件或到服务器位置的链接。默认值为 True。如果设置为 False,文档必须保存在共享文件夹中。
使用 SendForReview 方法启动协作审阅流程。使用 EndReview 方法结束审阅流程。
本示例通过电子邮件自动将当前演示文稿作为附件发送给指定的收件人。
Sub WebReview()
ActivePresentation.SendForReview _
Recipients:="someone@microsoft.com; amy jones", _
Subject:="Please review this document.", _
ShowMessage:=False, _
IncludeAttachment:=True
End Sub