Je cherche un moyen en VB d'ouvrir une boite de dialogue qui permette de choisir un repertoire de travail (idem getopenfilename, mais pour un repertoire).
Sub ChoixDoss()
Dim Dial As FileDialog
Set Dial = Application.FileDialog(msoFileDialogFolderPicker)
Dial.AllowMultiSelect = False
Dial.Title = "Choix du dossier de travail"
Dial.InitialView = msoFileDialogViewList
ChDir "c:\temp"
Dial.Show
End Sub