VBAのRoutingSlipプロパティ

こちらでは、エクセルVBAのRoutingSlipプロパティの解説になります。

プロパティとはオブジェクトの属性を指します。属性とは、そのオブジェクトの情報そのものです。プロパティはその値を取得したり、設定することもできます。プロパティを利用するにはオブジェクト名とプロパティ名の間に「.(ピリオド)」で結んで記述します。

オブジェクト名.プロパティ名

また、プロパティを設定する場合は以下のように「=(イコール)」を記述し設定値を代入します。

オブジェクト名.プロパティ名 = 設定値

RoutingSlipプロパティ

RoutingSlipプロパティは、オブジェクトを返すプロパティです。ブックの回覧先 (RoutingSlip オブジェクト) を返します。回覧先が存在しないときはエラーになるので、先に HasRoutingSlip プロパティの値を調べて、回覧先があることを確認しておきます。値の取得のみ可能です。

次の使用例は、Book1.xls というブックの回覧先を作成してから、ブックを 3 人の受取人に順に送信します。


Workbooks("BOOK1.XLS").HasRoutingSlip = True
With Workbooks("BOOK1.XLS").RoutingSlip
    .Delivery = xlOneAfterAnother
    .Recipients = Array("Ichirou Tanaka", _
        "Jirou Sato", "Saburou Suzuki")
    .Subject = "BOOK1.XLS を送ります。"
    .Message = "意見をお聞かせください。"
End With
Workbooks("BOOK1.XLS").Route

※ドラッグ(スワイプ)すると全体を確認できます。