É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
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.