Objet CustomLabel (Word)

Représente une étiquette de publipostage personnalisée. L'objet CustomLabel est membre de la collection CustomLabels. La collection CustomLabels contient tous les étiquettes de publipostage personnalisées répertoriées dans la boîte de dialogue Options pour les étiquettes.

Remarques

Utilisez CustomLabels (Index), où Index est le nom de l'étiquette personnalisée ou le numéro d'index, pour renvoyer un objet CustomLabel. L'exemple suivant crée un nouveau document avec une mise en page étiquette personnalisée existante nommée « My Labels ».

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

Le numéro d'index représente la position de l'étiquette de publipostage personnalisée dans la collection CustomLabels. L'exemple suivant montre comment afficher le nom de la première étiquette de publipostage personnalisée.

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

Remarque

[!REMARQUE] Les objets CustomLabel sont triés par ordre alphabétique dans la collection CustomLabels et leurs numéros d'index sont réaffectés dynamiquement en tant que le contenu de la modification de la collection. Pour cette raison, il est plus prudent de faire référence à un objet CustomLabel spécifique par nom plutôt que par le numéro d'index.

Utilisez la méthode Add pour créer une étiquette personnalisée. L'exemple suivant ajoute une étiquette de publipostage personnalisée nommée « My Labels » et définit la taille de la page.

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

Voir aussi

Référence du modèle objet Word

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.