Delivery Property Example

This example routes the document named "Status.doc" to two recipients, one after the other.

Documents("Status.doc").HasRoutingSlip = True
With Documents("Status.doc").RoutingSlip
    .Subject = "Status Doc"
    .AddRecipient Recipient:="Don Funk"
    .AddRecipient Recipient:="Eric Maffei"
    .Delivery = wdOneAfterAnother
End With
Documents("Status.doc").Route