VBA Boite de dialogue ouvrir avec chemin préétabli

[Matt51100]

Bonjour le forum,

Voici mon souci du jour :

J'aimerais placer un bouton sur une feuille qui lorsqu'il est déclenché ouvre la boite de dialogue "Ouvrir" mais avec un chemin (Ex : C:\Dossier1\dossier2...) que j'aurais spécifié dans ma macro.

je me doute que cela doit se faire avec getopenfilename mais je galère.

Merci d'avance,

A+, Matt.

 

[Pierrot93]

Re : VBA Boite de dialogue ouvrir avec chemin préétabli

Bonjour,

essaye ceci :

With Application.FileDialog(msoFileDialogFilePicker)
    .InitialFileName =  "C:\Dossier1\dossier2\"
    .Show
    If .SelectedItems.Count > 0 Then Workbooks.Open (.SelectedItems(1))
End With

bon après midi
@+

 

[brouersa]

Re : VBA Boite de dialogue ouvrir avec chemin préétabli

Essaye :

Workbooks.Open Filename:= _
"C:\Documents and Settings\abrouers\Bureau\Exemple.xls"

Alain.

 

[Matt51100]

Re : VBA Boite de dialogue ouvrir avec chemin préétabli

Bonjour Pierrot, brouersa, le forum.

Merci Pierrot ta soluce marche.

A+, Matt.