récup chemin complet d'un fichier

[fredl]

Bonjour à tous,
j'ai cherché dans le forum, en vain...
merci d'avance à vous si vous pouvez me guider.

je souhaiterais que l'utilisateur puisse selectionner un fichier dans une boite de dialogue style 'Fichier/ouvrir' pour pouvoir en récupérer le chemin complet.
Ex : class1.xls sous D:\\mes documents selectionné dans une arborescence
resultat attendu :
D:\\mes documents\\class1.xls

Bonne journée
Frédéric

 

[PascalXLD]

Bonjour

essaies

Dim FileFile As String

FileFile = Application.GetOpenFilename

Bon courage

 

[ERIC S]

Bonjour

regarde le code, à adapter

il evite certains problèmes comme pas de sélection de fichier, fichier déjà ouvert

A+ [file name=ouvrefichier_20060412122254.zip size=6025]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ouvrefichier_20060412122254.zip[/file]

 

[GG]

Salut le forum
Et pourquoi pas simplement dans une cellule
=CELLULE('Nomfichier')
qui renvoie le chemin du fichier après le premier enregistrement.
C:\\Documents and Settings\\XX\\My Documents\\[Classeur1.xls]Feuil1

 

[fredl]

ouaouh!!! top!

Merci eric pascal et gégé!,
vous etes des chef!
C'est exactement ce qu'il me faut!
Je m'en vais de ce pas utiliser vos suggestions
Bonne journée à tout trois et encore merci!!
Frédéric