Hello,
Tu peux t'inspirer de ce code,
Il ouvre une boite de dialogue, si l'utilisateur a sélectionné un fichier alors le chemin est inscrit dans Textbox1, sinon rien ne se passe
Sub OuvrirClasseur()
Dim Fichier As String
With Application.FileDialog(3)
.Show
On Error Resume Next 'si annuler
Fichier = .SelectedItems(1)
If Err.Number <> 0 Then Exit Sub
Textbox1.value = .SelectedItems(1)
End With
End Sub