Applies To
RoutingSlip Object.
Description
True if status tracking is enabled for the routing slip. Read-write before routing begins; read-only when routing is in progress.
Example
This example sends BOOK1.XLS to three recipients, with status tracking enabled.
Workbooks("BOOK1.XLS").HasRoutingSlip = True With Workbooks("BOOK1.XLS").RoutingSlip .Delivery = xlOneAfterAnother .Recipients = Array("Adam Bendel", "Jean Selva", "Bernard Gabor") .Subject = "Here is BOOK1.XLS" .Message = "Here is the workbook. What do you think?" .ReturnWhenDone = True .TrackStatus = True End With Workbooks("BOOK1.XLS").Route