MailingLabel オブジェクト

  • [アーティクル]
Microsoft Word Visual Basic リファレンス

MailingLabel オブジェクト

Application
MailingLabel
CustomLabels

宛名ラベルを表します。

使い方

MailingLabel プロパティを使用して MailingLabel オブジェクトを取得します。次の使用例は、宛名ラベルのオプションの既定値を設定します。

With Application.MailingLabel
    .DefaultLaserTray = wdPrinterLowerBin
    .DefaultPrintBarCode = True
End With

PrintOut メソッドを使用して、[ラベル オプション] ダイアログ ボックスの [製品番号] ボックスに表示される宛名ラベルを印刷します。次の使用例は、指定された住所を使用して、Avery standard の [5162 - 宛名ラベル] を 1 ページ印刷します。

addr = "Katie Jordan" & vbCr & "123 Skye St." _
    & vbCr & "OurTown, WA 98107"
Application.MailingLabel.PrintOut Name:="5162", Address:=addr

解説

CustomLabels プロパティを使用して、カスタム宛名ラベルの書式を設定するか、またはこのラベルを印刷します。次の使用例は、"MyLabel" という名前のカスタム宛名ラベルの、行数と列数を設定します。

With Application.MailingLabel.CustomLabels("MyLabel")
    .NumberAcross = 2
    .NumberDown = 5
End With