Bonjour,
J'utile la fonction "Application.FileDialog" pour choisir soit des dossiers, soit des fichiers.
Dim Dlg As FileDialog
Dim Opt As Integer
'msoFileDialogOpen --> 1 (Fichier / ouvrir à partir de la dernière racine accédée)
'msoFileDialogSaveAs --> 2 (Fichier / ouvrir à partir de la dernière racine accédée)
'msoFileDialogFilePicker --> 3 (Fichier / parcourt à partir de la dernière racine accédée)
'msoFileDialogFolderPicker --> 4 (Répert / à partir de la dernière racine accédée)
Opt = 1
Set Dlg = Application.FileDialog(Opt)
Ma problématique : La boite de dialogue propose la dernière racine accédée, je n'arrive pas à forcer le répertoire de départ à C:\ (par ex.)
Quelqu'un aurait-il la réponse ?
Merci d'avance.
Cordialement
Partager