Comment trouver le chemin d'accès d'un classeur

Bonjour à tous

Je cherche une commande sous VBA pour trouver le chemin d'accès d'un classeur

Ex : "C:/Mondossier/Classeur1.xls"

Merci d'avance

Lionel

Salut,

deja tu n'es pas dans le bon theme. Pour le VBA c'est ici :

Thèmes / Visual Basic 6 / Langages dérivés / VBA

vas voir le code que j'ai poster ici et remplace les lignes

.LookIn = "c:\Mes Documents"
.FileName = "*test*"

par

.LookIn = "c:\Mondossier"
.FileName = "Classeur1.xls"

A+

 Bonjour,

msgbox Workbooks(ActiveWorkbook.Name).FullName

jean-marc

http://www.vbfrance.com/infomsg_COMMENT-TROUVER-CHEMIN-ACCES-CLASSEUR_1164345.aspx

t'es à 5 minutes près?
puisque pas de réponse, je suppose que non!

VBA c'est VBA !!!

Merci JMO
C'est exactement ce qu'il me fallait

Private Sub CheminAcces()

Dim sIntermediare As String, sChemin As String, iLongueur As Integer

    sIntermediare = Workbooks(ActiveWorkbook.Name).FullName 'On enregistre le chemin
    iLongueur = Len(Workbooks(ActiveWorkbook.Name).FullName) 'On regarde sa longueur
    sChemin = Left(sIntermediaire, iLongueur - 14) ' On enlève le nom du classeur, 14 car ici on a : "Classeur1.xls"

'La chaine sChemin donne le chemin d'accès exacte ou se situe le classeur

End Sub

Si sa peut servir à d'autre personnes

Lionel