向指定的传送名单添加收件人姓名。
注意 如果收件人的姓名不在共用通讯簿上,会导致出错。
expression.AddRecipient(Recipient)
expression 必需。该表达式返回一个 RoutingSlip 对象。
Recipient String 类型,必需。收件人姓名。
本示例依次将活动文档传送给两个收件人。
ActiveDocument.HasRoutingSlip = True
With ActiveDocument.RoutingSlip
    .Subject = "Status Document"
    .AddRecipient Recipient:="Tim O' Brien"
    .AddRecipient Recipient:="Karin Gallagher"
    .Delivery = wdOneAfterAnother
End With
ActiveDocument.Route