Filedialog dans dossier preconfiguré

Bonjour,
J'ouvre par macro une filedialog pour selectionner un fichier..
voici mon code

Code:

---

1 2 3

Dim fichier As FileDialog Set fichier = Application.FileDialog(msoFileDialogFilePicker) fichier.Show

---

j'aimerai pouvoir predefinir l'emplacement de recherche, qui serait dans le dossier contenant le fichier excel utilisé,

par exemple : si mon fichier excel est dans " mes documents"
que le dossier de recherche soit " dans mes documents",
par ce qu' actuellement, c'est sur le bureau par defaut...
et ca peut etre fastidieux... quand les chemins sont longs....

merci

Salut,

Avec la propriete InitialFileName

Code:

---

1 2 3 4

Dim fichier As FileDialog Set fichier = Application.FileDialog(msoFileDialogFilePicker) fichier.InitialFileName = "c:\" ' Ici ton dossier avec *.xls pour ne voir que les xls par defaut fichier.Show

---

Bonjour à tous,

Citation:

---

si mon fichier excel est dans " mes documents"
que le dossier de recherche soit " dans mes documents"

---

Code:

---

1 2	fichier.InitialFileName = Application.ThisWorkbook.Path & "\"

---

Super:ccool: