Bouton - Recherche dossier référence sur réseau

Bonjour à tous,

J'ai vu sur ce forum courant 2019 un bel exemple qui couvrait ma demande.
Je suis hélas incapable de retrouver son auteur.

J'ai une structure dans mon tableur qui me permets de mettre en référence des liens automatiques (recherche de photo portrait pour le coup).

Il s'agit de pouvoir ouvrir une fenêtre de dialogue permettant de sélectionner un cheminement vers un dossier sur mon réseau et de l'inscrire dans une cellule.

Un petit exemple illustre ma demande dans le fichier joint.

D'avance merci pour votre intérêt !

Cordialement
Willau

Bonjour

Essayez ce code :

Sub chemin()
Dim Fichier As String

Fichier = Application.GetOpenFilename
Range("B3") = CurDir & "\"
End Sub

Cordialement

Bonjour

On peut savoir si votre demande est résolue ? Et si oui pouvez vous cloturer le fil

Cordialement