Affichage chemin d'un fichier dans une liste

  • Initiateur de la discussion Initiateur de la discussion 3idm
  • Date de début Date de début

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 !

3idm

XLDnaute Nouveau
Bonjour à tous,

Je suis de retour sur le forum pour vous soumettre un petit problème que je rencontre. J'ai balayer de long en large les discusions, mais je ne trouve pas mon bonheur, mais presque.......

Voilà :

J'ai récupéré un code sur le forum pour réaliser une application. Je vous joint l'exemple qui utilise getdirectory.
Mon probléme c'est que lorsque je clic sur le bouton, la fenêtre m'indiquant de choisir un fichier pointe toujours au même endroit, je ne sais pas où changer la directory dans la macro.

En faite, je veut rentrer un chemin en cellule par A10 exemple (exemple C:\Users\TOTO\Documents\) et lorsque je clic sur le bouton, la fenêtre de recherche s'ouvre en pointant déjà dans le répertoire Documents. Cela afin d'éviter les manipulations laborieuses .

Par avance, je vous remercie de votre attention, les idées sont les bienvenues
 

Pièces jointes

Re : Affichage chemin d'un fichier dans une liste

Bonjour 3idm

Un essai avec ceci

Code:
Option Explicit

Sub Test()
Dim strPath As String
GetFolder (strPath)
End Sub

Function GetFolder(strPath As String) As String
Dim fldr As FileDialog
Dim sItem As String
Set fldr = Application.FileDialog(msoFileDialogFolderPicker)
strPath = Feuil1.Range("a10")
With fldr
.Title = "Sélectionnez un dossier"
.AllowMultiSelect = False
.InitialFileName = strPath
If .Show <> -1 Then GoTo NextCode
sItem = .SelectedItems(1)
End With
NextCode:
GetFolder = sItem
Set fldr = Nothing
End Function
 
Dernière édition:
Re : Affichage chemin d'un fichier dans une liste

Bonjour Lone-wolf,

Merci de ton intérêt ainsi que de ton code.

ça fonctionne en parti, car j'arrive à pointer sur la directory désirée, mais je ne vois pas les fichier qui se trouvent dans le répertoire qui est pointé.

J'ai besoin au final de voir les fichiers qui se trouvent dans le repertoire pointé, et quand je selectionne l'un d'entre eux, le chemin de celui-ci doit se noter en A1.
En faite je souhaite avoir la même fonction que dans l'exemple que j'ai mis en PJ, mais à la différence de pouvoir choisir le chemin de recherche plus automatisé.

Merci bien
 
- 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

A
Réponses
2
Affichages
1 K
Aurore
A
M
Réponses
1
Affichages
1 K
Y
Retour