Partager via


Événement Application.MailMergeDataSourceLoad (Word)

Se produit lorsque la source de données est chargée en vue d'une opération de publipostage.

Syntaxe

expression. MailMergeDataSourceLoad (Doc)

Expression Variable qui représente un objet « Application » qui a été déclaré avec des événements dans un module de classe. 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.

Exemple

Cet exemple montre comment afficher un message indiquant le nom du fichier de source de données lorsque le chargement de cette dernière débute. Il 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 Word.

Private Sub MailMergeApp_MailMergeDataSourceLoad(ByVal Doc As Document) 
 Dim strDSName As String 
 Dim intDSLength As Integer 
 Dim intDSStart As Integer 
 
 'Extract from the Name property only the file name 
 intDSLength = Len(Doc.MailMerge.DataSource.Name) 
 intDSStart = InStrRev(Doc.MailMerge.DataSource.Name, "\") 
 intDSStart = intDSLength - intDSStart 
 strDSName = Right(Doc.MailMerge.DataSource.Name, intDSStart) 
 
 'Deliver a message to user when data source is loading 
 MsgBox "Your data source, " & strDSName & ", is now loading." 
End Sub

Voir aussi

Objet Application

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.