Поделиться через


Workbook.RoutingSlip Свойство (2007 System)

Обновлен: Ноябрь 2007

Получает объект Microsoft.Office.Interop.Excel.RoutingSlip, представляющий маршрут для книги.

Пространство имен:  Microsoft.Office.Tools.Excel
Сборка:  Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
<BrowsableAttribute(False)> _
Public ReadOnly Property RoutingSlip As RoutingSlip
'Применение
Dim instance As Workbook
Dim value As RoutingSlip

value = instance.RoutingSlip
[BrowsableAttribute(false)]
public RoutingSlip RoutingSlip { get; }

Значение свойства

Тип: Microsoft.Office.Interop.Excel.RoutingSlip
Объект Microsoft.Office.Interop.Excel.RoutingSlip, представляющий маршрут для книги.

Заметки

Чтение этого свойства при отсутствии маршрута вызывает исключение (необходимо сначала проверить свойство HasRoutingSlip).

Примеры

В следующем примере путем проверки значений свойства Routed программный код определяет, отправлена ли книга по маршруту. Если рабочая книга не отправлена по маршруту, в данном примере свойству HasRoutingSlip присваивается значение true, свойству Subject присваивается строка темы бланка маршрута, а затем с помощью свойства RoutingSlip задаются тип доставки, сообщение и его получатели. В завершение в этом примере вызывается метод Route для отправки рабочей книги по маршруту.

В этом примере демонстрируется настройка уровня документа.

Private Sub RouteWorkbook()
    If Not Me.Routed Then
        Me.HasRoutingSlip = True
        Me.Subject = "Here is the forecast spreadsheet."

        Dim routingSlip As Excel.RoutingSlip = Me.RoutingSlip
        routingSlip.Delivery = Excel.XlRoutingSlipDelivery.xlOneAfterAnother
        routingSlip.Message = "Please review and provide your feedback."
        routingSlip.Recipients = New String() _
            {"Don Hall", "Sydney Higa", "Ron Gabel"}
        Me.Route()
    End If
End Sub
private void RouteWorkbook()
{
    if (!this.Routed)
    {
        this.HasRoutingSlip = true;
        this.Subject = "Here is the forecast spreadsheet.";

        Excel.RoutingSlip routingSlip = this.RoutingSlip;
        routingSlip.Delivery = Excel.XlRoutingSlipDelivery.xlOneAfterAnother;
        routingSlip.Message = "Please review and provide your feedback.";
        routingSlip.set_Recipients(0,
            new string[] { "Don Hall", "Sydney Higa", "Ron Gabel" });
        this.Route();
    }
}

Разрешения

См. также

Ссылки

Workbook Класс

Workbook - члены

Microsoft.Office.Tools.Excel - пространство имен