Événement Application.MailMergeInsertBarcode (Publisher)

Article
04/07/2023

Se produit lorsque l'utilisateur envoie la commande d'insertion de codes-barres postaux dans une composition de fusion et publipostage, soit via l'interface utilisateur (IU) de Microsoft Publisher, soit par programmation.

Syntaxe

expression. MailMergeInsertBarcode (Doc, OkToInsert)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Doc	Obligatoire	Document	La composition active.
OkToInsert	Obligatoire	Booléen	Paramètre de sortie. La valeur true s'il est possible d'insérer des codes-barres.

Remarques

Utilisez la méthode TextRange.InsertBarcode pour insérer des codes-barres dans une composition de fusion et publipostage.

Compléments tiers qui valider les adresses de fusion et publipostage peuvent utiliser l'événement MailMergeInsertBarcode pour écouter les actions de l'utilisateur qui demande ce codes-barres insérée. Dans ce cas, lorsque le complément reçoit une notification indiquant que l’événement MailMergeInsertBarcode s’est déclenché, il vérifie la validité des adresses dans la liste de fusion et publipostage et, si les adresses sont valides, il tente de générer des codes-barres. Si cette tentative réussit, le complément doit retourner True pour le paramètre OkToInsert . Si la tentative échoue, le complément doit retourner False.

Les données de code-barres réelles sont fournies à Publisher via l'événement MailMergeGenerateBarcode.

L’événement MailMergeInsertBarcode est également déclenché lorsqu’un utilisateur choisit Ajouter un code-barres postal dans le volet Office Fusion et publipostage ou Fusion de catalogue , ou Ajouter des codes-barres postaux dans le volet Office Tâches publisher de l’interface utilisateur de Publisher. Avant qu’un utilisateur puisse choisir l’une de ces commandes d’interface utilisateur, vous devez d’abord les rendre disponibles en définissant la propriété InsertBarcodeVisible sur True.

Pour plus d’informations sur l’utilisation d’événements avec l’objet Application , consultez Utilisation d’événements avec l’objet Application.

Exemple

Le suivant Microsoft Visual Basic pour Applications (VBA) montre comment gérer l'événement MailMergeInsertBarcode. Il affiche un message demandant si vous voulez poursuivre l'insertion de codes-barres.

Private Sub pubApplication_MailMergeInsertBarcode(ByVal Doc As Document, OkToInsert As Boolean) 
 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Proceed to insert barcodes?", vbYesNo) 
 
 If intResponse = vbYes Then OkToInsert = True 
 
End Sub

Pour que cet événement se produise, vous devez placer la ligne de code suivante dans la section Déclarations générales de votre module.

Public WithEvents pubApplication As Application

Vous devez ensuite exécuter la procédure d’initialisation suivante.

Public Sub Initialize_pubApplication() 
 Set pubApplication = Publisher.Application 
End Sub

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.

Partager via