重新设置传送名单,从而可用同一名单初始化一个新的传送过程(使用同一收件人列表和收件人地址信息)。使用本方法之前,该传送过程必须已完成。否则本方法将导致错误。
expression.Reset
expression 必需。该表达式返回一个 RoutingSlip 对象。
如果工作簿“Book1.xls”的传送过程已完成,本示例将重新设置传送名单。
With Workbooks("BOOK1.XLS").RoutingSlip
If .Status = xlRoutingComplete Then
.Reset
Else
MsgBox "Cannot reset routing; not yet complete"
End If
End With