Auf Englisch lesen

Freigeben über


CustomLabel-Objekt (Word)

Stellt ein benutzerdefiniertes Adressetikett dar. Das CustomLabel-Objekt ist ein Element der CustomLabels-Auflistung . Die CustomLabels-Auflistung enthält alle im Dialogfeld Etiketten einrichten aufgeführten, benutzerdefinierten Adressetiketten.

Hinweise

Verwenden Sie CustomLabels (Index), wobei Index der benutzerdefinierte Bezeichnungsname oder die Indexnummer ist, um ein einzelnes CustomLabel-Objekt zurückzugeben. Im folgenden Beispiel wird ein neues Dokument mit einem vorhandenen benutzerdefinierten Bezeichnungslayout namens "Meine Bezeichnungen" erstellt.

Set ML = Application.MailingLabel 
If ML.CustomLabels("My Labels").Valid = True Then 
 ML.CreateNewDocument Name:="My Labels" 
Else 
 MsgBox "The My Labels custom label is not available" 
End If

Die Indexnummer stellt die Position des benutzerdefinierten Adressetiketts in der CustomLabels-Auflistung dar. Im folgenden Beispiel wird der Name des ersten benutzerdefinierten Adressetiketts angezeigt.

If Application.MailingLabel.CustomLabels.Count >= 1 Then 
 MsgBox Application.MailingLabel.CustomLabels(1).Name 
End If

Hinweis

CustomLabel-Objekte werden in der CustomLabels-Auflistung alphabetisch sortiert, und ihre Indexnummern werden dynamisch neu zugewiesen, wenn sich der Inhalt der Auflistung ändert. Aus diesem Grund ist es sicherer, auf ein bestimmtes CustomLabel-Objekt anhand des Namens und nicht anhand der Indexnummer zu verweisen.

Verwenden Sie die Add-Methode , um eine benutzerdefinierte Bezeichnung zu erstellen. Im folgenden Beispiel wird das benutzerdefinierte Adressetikett "My Labels" hinzugefügt und das Seitenformat festgelegt.

Set ML = _ 
 Application.MailingLabel.CustomLabels.Add(Name:="My Labels", _ 
 DotMatrix:=False) 
ML.PageSize = wdCustomLabelA4

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.