Bonjour,
J'aimerais réaliser un publipostage dans word via une base de donnée Excel.
Les données Excel sont relatives à des références d'appareils.
Le but serait que l'opérateur remplisse la ligne correspondant à l'appareil rentré et qu'en lançant une macro, le document publiposté soit enregistré et imprimé sous word en sachant que chaque ligne correspond à un document enregistré à part lors du publipostage.
J'ai fais une macro basique pour lancer le document word depuis Excel qui est la suivante :
Le problème est que lorsque je lance la macro, il ouvre word mais n'effectue pas automatiquement le publipostage (macro publipostage effectuée par ailleurs dans word) et au lieu de ça il me demande de redonnée ma source pour le publipostage mais en boucle. C'est à dire que même quand je réindique la source de donnée Excel à utiliser, il me la redemande après et ainsi de suite de façon continue..
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Dim WordApp As Word.Application Dim WordDoc As Word.Document Set WordApp = New Word.Application On Error GoTo Line1 Set wrdDoc = WordApp.Documents.Open("S:\Appareils.doc") wrdApp.Visible = True Exit Sub Line1: MsgBox "Le fichier 'Appareils' doit être placé dans le répertoire 'S:\", vbOKOnly + vbExclamation, "Attention" End Sub
Quelqu'un pourrez m'éclairer sur se problème s'il vous plaît ...!!
Merci d'avance !
Partager