Boite de dialogue ouvrir
t
Bonjour,
dans la boite de dialogue ouvrir
je voudrais afficher que les fichiers provenant d'un tableau
exemple:
Set fd = Application.FileDialog(msoFileDialogFilePicker)
y = 0
For i = 3 To Dercell
If WsHF.Range("B" & i) = "Finale" Then
ReDim Preserve Tbl(y)
Tbl(y) = WsHF.Range("A" & i) & " " & WsHF.Range("F" & i) & " " & WsHF.Range("I" & i)
y = y + 1
End If
Next i
With fd
'afficher les fichiers de Tbl()
end withmerci d'avance
E
Bonjour,
Après recherche, il semble que cela ne soit pas possible. La fonction "Application.FileDialog(msoFileDialogFilePicker)" ne permet pas les noms de fichiers dans les filtres (uniquement les types).
Solution :
Laisser l'utilisateur choisir un fichier et vérifier s'il est présent dans la liste des fichiers autorisés (liste stockée dans un tableau ou directement en balayant la liste dans la feuille où les noms sont stockés).
Bonne journée