Événement Application.MailMergeGenerateBarcode (Publisher)

Se produit lorsque Microsoft Publisher nécessite des données pour générer des codes-barres dans une composition de fusion et publipostage, en particulier lorsque la liste de destinataires de fusion et publipostage est modifiée.

Syntaxe

expression. MailMergeGenerateBarcode (Doc, bstrString)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
Doc Obligatoire Document La composition active.
bstrString Obligatoire Chaîne Paramètre de sortie. Une chaîne représentant le code-barre.

Remarques

Compléments tiers qui valider les adresses de fusion et publipostage peuvent utiliser l'événement MailMergeGenerateBarcode pour écouter les actions de l'utilisateur qui demande ce codes-barres être générée. Dans ce cas, lorsque le complément reçoit une notification que l'événement MailMergeGenerateBarcode déclenché, et si le document actif est connecté à une source de données, le complément peut utiliser la propriété MailMergeDataSource.ActiveRecord pour déterminer l'enregistrement pour lequel générer le code à barres. Si le document actif n'est pas connecté à une source de données, le complément utilise le texte de l'adresse directement.

Si le complément peut utiliser directement le texte de l’adresse, il retourne une représentation sous forme de chaîne du code-barres pour le paramètre de sortie bstrString . Si le complément ne peut pas utiliser le texte d'adresse directement, il renvoie une chaîne vide.

Pour permettre le déclenchement de l’événement MailMergeGenerateBarcode , vous devez gérer l’événement MailMergeInsertBarcode dans votre code, et le complément doit définir le paramètre OkToInsert passé à cet événement 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 MailMergeGenerateBarcode. Elle retourne la chaîne qui représente le code-barres de l’enregistrement actif. Notez que la variable indexNumberOfBarcodeColumn représente le numéro d’index de la colonne de la source de données qui répertorie les codes-barres. Ce code suppose que la composition en cours est connectée à une source de données.

Private Sub pubApplication_MailMergeGenerateBarcode(ByVal Doc As Document, bstrString As String) 
 bstrString = pubApplication.ActiveDocument.MailMerge.DataSource.DataFields.Item(indexNumberOfBarcodeColumn).Value 
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.