Discussion :

[zoumzoum59]

Bonjour à tous

je voudrais savoir comment récuperer le chemin d'un fichier qui est déjà ouvert dans excel.

J'ai fait différente recherche sur Path, getfile, getfileopen mais je n'arrive pas à recoler les morceaux pour que ça fonctionne.

Si quelqu'un peut m'aiguiller.

Merci d'avance

[SfJ5Rpw8]

ben de quel fichier parle-tu et comment est-t'il ouvert..?

[zoumzoum59]

Bonjour bbil

Mon fichier est ouvert par appel de la boite de dialogue ouvrir avec le code suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
filetoopen = Application _
    .GetOpenFilename("Fichiers excel (*.xls), *.xls")

Et je voudrais récupérer le chemin pour enregistrer un autre fichier et le sauvegarder dans le même repertoire.

[SfJ5Rpw8]

ce code n'ouvre pas un fichier mais permet juste d'en récupérer le chemin+nom... il n'y as pas une suite.. du style WorkBooks.open(FiletoOpen...)..

[zoumzoum59]

Si voilà le code complet

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
filetoopen = Application _
    .GetOpenFilename("Fichiers excel (*.xls), *.xls")
    Stop
If filetoopen <> False Then
    Workbooks.Open (filetoopen)
End If

Autant pour moi.

[SfJ5Rpw8]

ben défini une variable de type workbook ... qui te permettra de récupérer le chemin et aussi d'agir sur ce classeur sans avoir besoin d'avoir à jongler avec les activate et select...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
dim wk as workbook
 
filetoopen = Application _
    .GetOpenFilename("Fichiers excel (*.xls), *.xls")
    Stop
If filetoopen <> False Then
set wk =    Workbooks.Open (filetoopen)
msgbox "le chemin : " & wk.path 
 
msgbox wk.sheets(1).name
 
 
End If

[zoumzoum59]

Merci bbil

c'est exactement ce que je cherchais.

Donc le plus simple est de passer par une variable, ce qui permet d'utiliser la propriete path.

Est on obligé de passer par une variable et/ou est ce toujours préférable de le faire ?

[SfJ5Rpw8]

ben le passage par une variable ... te permet ensuite d'agir plus facilement sur le classeur...

[zoumzoum59]

Ok merci bbil

Toute connaissance est bonne à prendre et j'en ai beaucoup encore à découvrir.

Merci encore.