Événement Application.MailMergeBeforeRecordMerge (Word)
Se produit lorsque la fusion d'un enregistrement particulier du publipostage est exécutée.
Syntaxe
expression. MailMergeBeforeRecordMerge (Doc, Cancel)
expressionUne variable qui représente un objetApplication.
Pour plus d’informations sur l’utilisation d’événements avec l’objet Application , consultez Utilisation d’événements avec l’objet Application.
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Doc | Obligatoire | Document | Document principal de publipostage. |
| Cancel | Obligatoire | Booléen | La valeur True arrête le processus de fusion et publipostage, pour l'enregistrement actif uniquement, avant son démarrage. |
Exemple
Cet exemple montre comment vérifier que la longueur du code postal, qui dans cet exemple est le champ numéro six, est inférieure à cinq chiffres et, le cas échéant, annule la fusion uniquement pour cet enregistrement. L'exemple présuppose que vous avez déclaré une variable d'application dénommée MailMergeApp dans vos déclarations générales et que vous lui avez affecté une valeur identique à celle de l'objet Application de Microsoft Word.
Private Sub MailMergeApp_MailMergeBeforeRecordMerge(ByVal _
Doc As Document, Cancel As Boolean)
Dim intZipLength As Integer
intZipLength = Len(ActiveDocument.MailMerge _
.DataSource.DataFields(6).Value)
'Cancel merge of this record only if
'the ZIP Code is fewer than five digits
If intZipLength < 5 Then
Cancel = True
End If
End Sub
Voir aussi
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.