ouvrir un fichier word dont on ne connait qu'une partie du nom

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

renaud7

XLDnaute Nouveau
Salut,
je cherche à ouvrir un fichier word à partir d'une macro... jusque là pas de pb mais en fait je veux récupérer la valeur d'une cellule et je sais que le fichier word à ds son nom la valeur de cette cellule mais je ne connais pas le nom entier du fichier... je pense qu'il y a une histoire avec des * mais je galere un peu...
quelqu'un peut m'aider???

Sub OuvrirFichier()
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Dim i As Byte

Set WordApp = CreateObject("word.application") 'ouvre une session Word
Set WordDoc = WordApp.Documents.Open("E:\Users\Renaud\Desktop\FiCAQ 1\fait\FICAQ.doc") 'ouvre le document Word"
WordApp.Visible = True 'Word est masqué pendant l'opération


i = 2
'les signets du document Word sont nommés Signet1 , Signet2 , Signet3
WordApp.Documents.Open ("E:\Users\Renaud\Desktop\FiCAQ 1\fait\") & Cells(i, 1) & * ".doc ")
WordDoc.Bookmarks("NumFiche").Range.Text = Cells(i, 3)

WordApp.Visible = True 'affiche le document Word
'WordDoc.PrintOut 'Pour imprimer le doc obtenu

'WordDoc.Close True 'ferme le document word en sauvegardant les données
'WordApp.Quit 'ferme la session Word
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
511
Retour