Bonjour à tous,

je suppose qu'il ne s'agit pas de grand chose, mais j'ai du mal malgré quelques tests, à trouver la solution à mon petit soucis :

Je m'explique: je me suis basé, entre autre, sur http://heureuxoli.developpez.com/publipostage/
et sur divers posts du forum, pour me faire un publipostage avec un Word prédéfini bourré de champs de fusion.
Le code-source que j'ai utilisé est celui-ci :

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
Sub MergeIt()
Dim objWord As Word.Document
Set objWord = GetObject("C:\Local Data\Access\Publipostage\Publipostage.doc", "Word.Document")
' Rend Word visible important puisque la fusion se fait à l'écran.
objWord.Application.Visible = True
' Sélectionne .la base de données Comptoir comme source de données pour la fusion
objWord.MailMerge.OpenDataSource _
		Name:="C:\Local Data\Access\Publipostage\Comptoir.mdb", _
		LinkToSource:=True, _
		Connection:="TABLE Employés", _
		SQLStatement:="SELECT * FROM [Employés]"
' Exécution de la fusion.
objWord.MailMerge.Execute
Set objWord = Nothing
 
End Sub
J'ai donc deux petits soucis avec celui-ci :
le premier, c'est que Word, avant de générer le doc, me lance une fenêtre d'autorisation pour taper dans le SQL de access
Le second, c'est qu'un premier doc Word s'ouvre, à savoir mon modèle pour le publipostage, puis un second doc s'ouvre, sortant pile comme je le souhaite.
Les deux restent ouverts, or je ne souhaiterai bien sûr pas du premier.

Quelqu'un aurait-il une idée sur une ligne de code ou deux pour régler cela svp ?

Merci d'avance !