Bonjour,
En procédant de la manière suivante:
1- Créer une base de données dans Access, contenant la table A;
2- Créer un fichier word et publiposter les données de A dans ce dernier;
3- Créer un formulaire à partir de la table A, et y ajouter un bouton;
4- Mettre le code cité ici (http://access.developpez.com/faq/?page=Word), dans l'évènement clique du bouton.
Résultat, quand je clique sur le bouton, j'ai l'erreur " Access ne peut pas trouver la macro 'Dim wdapp As Word'."
J'essaie de contourner le problème, en faisant ça:
1-Créer un module où je mets:
Quand j'exécute ce module, le fichier word en question s'ouvre, mais il n y a pas de fusion et j'ai l'erreur ('4605' Cette méthode ou propriété n'est pas disponible car le document n'est pas un document principal de fusion.)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Sub Fusion() Dim wdapp As Word.Application 'Démarrer Word Set wdapp = CreateObject("Word.application") With wdapp .Visible = True 'ouvrir le document .Documents.Open "Chemincompletdudocumentwordàouvrir" 'Diriger le publipostage vers un nouveau document .ActiveDocument.MailMerge.Execute End With 'fermer et libérer les objets Set wdapp = Nothing End Sub
Qu'est ce que je peux faire pour résoudre ce problème? Et merci beaucoup d'avance pour vos réponses.
Partager