Comment fait-on pour dire le repertoire dans lequel on veut que l'ouverture
de la boite de dialogue soit ?
Comment fait-on pour savoir si un fichier à été selectionné ?
Dim fd As FileDialog
Set fg = Application.FileDialog(msoFileDialogOpen)
With fg
.Filters.Add "Fichier ini", "*.ini", 1
.Show
End With
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacques
Comment fait-on pour dire le repertoire dans lequel on veut que l'ouverture de la boite de dialogue soit ?
voir la propriété .InitialFileName qui peut contenir un chemin avec ou sans nom de fichier.
Comment fait-on pour savoir si un fichier à été selectionné ?
voir la propriété .SelectedItems, si .AllowMultiSelect = False :
With fg .InitialFileName = "C:Repertoire" .Filters.Add "Fichier ini", "*.ini", 1 .Show If .SelectedItems.Count > 0 Then MsgBox .SelectedItems(1) End With
-- Cordialement,
Jacques.
Comment fait-on pour dire le repertoire dans lequel on veut que l'ouverture
de la boite de dialogue soit ?
voir la propriété .InitialFileName qui peut contenir un chemin avec ou
sans nom de fichier.
Comment fait-on pour savoir si un fichier à été selectionné ?
voir la propriété .SelectedItems, si .AllowMultiSelect = False :
With fg
.InitialFileName = "C:Repertoire"
.Filters.Add "Fichier ini", "*.ini", 1
.Show
If .SelectedItems.Count > 0 Then MsgBox .SelectedItems(1)
End With
Comment fait-on pour dire le repertoire dans lequel on veut que l'ouverture de la boite de dialogue soit ?
voir la propriété .InitialFileName qui peut contenir un chemin avec ou sans nom de fichier.
Comment fait-on pour savoir si un fichier à été selectionné ?
voir la propriété .SelectedItems, si .AllowMultiSelect = False :
With fg .InitialFileName = "C:Repertoire" .Filters.Add "Fichier ini", "*.ini", 1 .Show If .SelectedItems.Count > 0 Then MsgBox .SelectedItems(1) End With
