XL 2016 Ajout d'une requête SQL dans code VBA

[lincoln75]

Bonjour,

Merci de bien vouloir prendre en compte ma demande
J'ai créé un fichier Excel avec une base de données dont le but est d'imprimer des étiquettes avec un publipostage Word
J'ai créé un code vba qui permet d'ouvrir le document Word
Malheureusement, il manque la requête SQL suivante :

Peut on ajouter cette requête dans le code
Je vous joins le code existant

Sub ouvrirWord()

Dim strFichier As String, chemin As String
Dim objWord As New Word.Application

chemin = "C:\Users\xxxxxxx\Desktop\" 'Répertoire du fichier
fichier = "plage_etiquette.docx" 'Nom du fichier

objWord.Documents.Open chemin & fichier
objWord.Visible = True 'Rendre Word visible
End Sub
Je vous remercie de votre aide
Bien cordialement

 

[Phil69970]

Bonjour @lincoln75

Une autre approche sans word est possible voir ici pour une demande similaire.

Perso : Sans fichier je n'irais pas plus loin

 

[lincoln75]

Bonjour Phil69970,

Je vous remercie pour votre réponse
J’aimerais persévérer tout de même dans le publipostage avec Word
Si je vous joins le fichier, auriez vous le temps ou l’envie d’y jeter un œil pour avancer dans cette demande
Dans l'attente de vous lire
Bien cordialement

 

[Phil69970]

@lincoln75

Perso je préfère travailler tout dans excel car je trouve cela beaucoup plus pratique avec une version "tout en un" comme montré dans le lien que j'ai mis dans mon post précédent.
1 seul fichier qui fait tout au lieu de jongler entre excel et word
Après c'est toi qui vois mais sans moi dans un des 2 cas car pas assez a l'aise avec word que je n'aime pas sauf obligation .
Avec excel on peut tout faire sauf le café !!!
Bonne lecture