Bonjour,
j'ai réalisé un document word en lien avec un tableur excel situé dans le même dossier. Le problème est que ce dossier va être copier par les utilisateurs et coller sur leur pc persos. J'ai donc besoin de connaitre le chemin d'accès du fichier word pour créer ma liaison avec excel. Voilà ce que donne mon code dans Word:
Pour information j'ai trouvé que dans excel il faut utiliser thisworkbook.path, mais je n'ai pas trouvé pour word.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub Lancer() Dim chemin As String chemin =???? Dim ExcApp As Object Dim Fichier As String Set ExcApp = CreateObject("excel.Application") ExcApp.Visible = True Fichier = chemin & "bibliothèque.xlsm" ExcApp.Workbooks.Open (Fichier) Set ExcApp = Nothing End Sub
Merci d'avance
Merci d'avance
Partager