Discussion :

[Flo3301]

Bonjour,

Mon problème se trouve dans le titre, j'ai beau avoir cherché quelque temps je n'ai pas vraiment trouvé de réponse adaptée.

J'aimerais en effet que la fonction Dir parcours tous les fichiers d'un dossier (qui en regroupe des milliers...) selon la date de modification (qu'importe que cela soit dans l'ordre croissant ou décroissant) et non selon le nom du fichier (ce qui est le cas par défault).

Auriez vous une solution ? Voici une petite partie de mon code pour vous donner une idée:

Code :

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

1
2
3
4
5
6
7
8
    w = Dir(Path)
    Do While w <> ""
    If InStr(w, QE & Range("For_1").Offset(j, 1).Value) >= 1 Then GoTo Step3
    w = Dir
    Loop
        Range("Dat").Offset(k, 0).Value = Range("For_1").Offset(j, 1).Value
        Range("Typ").Offset(k, 0).Value = QE
        k = k + 1

Merci d'avance !

[kiki29]

Salut, avec http://www.developpez.net/forums/d20...feuille-excel/ et/ou http://silkyroad.developpez.com/VBA/...asseurs/#LIV-C tu devrais arriver à qqch

[CodeFacile]

Pour moi la fonction Dir ne permet pas de choisir l'ordre de récupération.
J'en ai déduit que l'ordre délivré correspond à l'ordre ou les fichiers ont été mis dans le rep ( et nomn pas à l'ordre de modification ou création).
Fait un test en ajoutant , suprimant , modifiant les fichiers .

Il n'y a qu'une solution qui consiste à te générer un tableau avec les infos fichier ( méthodes données par Kiki) et à trier ce tableau dans l'ordre que tu désires ( Je pense que Bill n'a pas été jusqu'au bout sur ce coup là) .

[Flo3301]

Tout d'abord merci à tous les deux.

Je pense effectivement ajouter tous mes fichiers dans un tableau virtuel puis les trier par la suite je vais me renseigner la dessus, l'idée m'a été donnée ce midi, je n'y avais même pas pensé (damn it !). En plus de répondre à ma demande initiale ca me fera gagner un temps considérable donc ca à l'air d'etre l'idéal. Reste l'étape du codage

Merci encore pour vos suggestions !