Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

lincoln75

XLDnaute Nouveau
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
 

lincoln75

XLDnaute Nouveau
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

XLDnaute Barbatruc
@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
 

Discussions similaires

  • Question
Microsoft 365 Code VBA
Réponses
10
Affichages
665
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…