msoFileDialogOpen et initialfilename

**cati_78** · 13/05/2009, 22h30

Bonjour,

Je souhaite utiliser la boîte de dialogue "ouvrir" en initialisant un chemin d'accès à l'ouverture de la boîte de dialogue.

Le ? du code peut varier : C ou D par exemple

J'avais essayé * et ? notamment mais la propriété initialfilename ne fonctionne pas et un chemin d'accès par défaut est activé.

Je ne sais pas comment faire pour que le chemin défini dans initialname soit pris en compte.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
With Application.FileDialog(msoFileDialogOpen)
        .AllowMultiSelect = False
        .Initialfilename= "?:\DOCUMENTS\DOSSIER\ESSAI"
        .Show
End with

Merci d'avance pour votre aide.

**casefayere** · 14/05/2009, 07h16

Bonjour cati, le forum,

essaies ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Initialfilename= "?" & ":\DOCUMENTS\DOSSIER\ESSAI"

sans garantie

bonne journée

**LeForestier** · 14/05/2009, 08h59

Bonjour,
Une solution parmi d'autre...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim Chemin As String
    Chemin = "C:\DOCUMENTS\DOSSIER\ESSAI"
    If Dir(Chemin) = "" Then
        Chemin = "D:\DOCUMENTS\DOSSIER\ESSAI"
    End If
 
With Application.FileDialog(msoFileDialogOpen)
        .AllowMultiSelect = False
        .InitialFileName = Chemin
        .Show
End With

A+

**cati_78** · 14/05/2009, 21h14

Bonjour,

Je souhaite savoir comment il faut modifier le code si le "?" représente par exemple 4 lettres possibles : c, d, e, f.

Merci d'avance pour votre aide.

**cati_78** · 16/05/2009, 09h17

Bonjour,

Je souhaite savoir s'il y a possibilité d'effectuer cette opération avec les méthodes msoFileDialogFilePicker ou getopenfilename.

Car initialement je connais le nom du dossier et du fichier. Mais le nom du répertoire constituant le chemin d'accès complet (c, d, e ou f) peut changer.

Merci d'avance pour votre aide.