Bonjour,
Je recupere une liste de nom de fichier avec FileSearch comme ceci:
Code :
- With Application.FileSearch
- .NewSearch
- .RefreshScopes
- .LookIn = "unRepertoireParticulier"
- .Filename = "toto*"
- .FileType = msoFileTypeExcelWorkbooks
- .LastModified = msoLastModifiedLastWeek
- .SearchSubFolders = False
-
- If .Execute() > 0 Then
- For i = 1 To .FoundFiles.Count
- MsgBox .FoundFiles(i)
- Next i
- Else
- MsgBox "File not found."
- End If
- End With
|
J'aimerai que la liste des fichiers trouves soient triee par ordre de modification (ou du moins par ordre alphabetique car je respecte une nomenclature appropriee)
Exemple:
toto_2005_08_18.xls <-- doit se trouver dans .FoundFiles(1)
toto_2005_08_19.xls <-- doit se trouver dans .FoundFiles(2)
toto_2005_08_22.xls <-- doit se trouver dans .FoundFiles(3)
P.S: J'ai l'impression que c'est deja le cas, mais l'aide sur FileSearch ne donne aucun renseignement sur son fonctionnement ni dans quel ordre elle parcourt le repertoire.
Message édité par guendalf le 22-08-2005 à 10:57:45
---------------
Guendalf
