Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Stellt ein Adressetikett dar.
Hinweise
Mit der MailingLabel-Eigenschaft geben Sie das MailingLabel-Objekt zurück. Im folgenden Beispiel werden Standardoptionen für Adressetiketten festgelegt.
With Application.MailingLabel
.DefaultLaserTray = wdPrinterLowerBin
.DefaultPrintBarCode = True
End With
Verwenden Sie die PrintOut-Methode, um ein Adressetikett zu drucken, das im Dialogfeld Etikettenoptionen im Feld Produktnummer aufgeführt ist. Im folgenden Beispiel wird eine Seite von Avery 5162 Standardadressetiketten mit der angegebenen Adresse gedruckt.
addr = "Katie Jordan" & vbCr & "123 Skye St." _
& vbCr & "OurTown, WA 98107"
Application.MailingLabel.PrintOut Name:="5162", Address:=addr
Verwenden Sie die CustomLabels-Eigenschaft , um ein benutzerdefiniertes Adressetikett zu formatieren oder zu drucken. Im folgenden Beispiel wird die Anzahl der Beschriftungen für die benutzerdefinierte Bezeichnung "MyLabel" festgelegt.
With Application.MailingLabel.CustomLabels("MyLabel")
.NumberAcross = 2
.NumberDown = 5
End With
Siehe auch
Referenz zum Word-Objektmodell
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.