Discussion :

[simstef]

Bonjour à tous,

Voici mon but :

Ouvrir, via vba, un nombre de classeurs inconnus et qui possédent la même structure. Ces fichiers se trouvent dans le même répertoire.
Je reprend les données qui se trouvent dans ces classeurs et les copie les unes à la suite des autres dans un seul classeur.
Jusque là, ca fonctionne.
J'utilise la commande Dir pour retrouver tous les fichiers xls et je copie ensuite leur contenu.
J'en viens donc à ...

Mon problème :

J'aimerais ouvrir ces fichiers du plus ancien au plus récent.

Ma question :

Y at'il un paramètre de la commande DIR qui permet de faire celà ?

Précisions:

- J'ai vérifié dans l'aide de vba, mais n'ai pas trouvé de paramètre de ce style.
- J'ai fait une recherche sur google, sur ce site et sur ce forum. A moins que je sois passé à côté, je n'ai pas trouvé la solution.

Quelqu'un voudrait-t'il m'aider svp ?

Merci d'avance

[SilkyRoad]

bonjour

J'espère que ce lien pourra t'aider

http://excel.developpez.com/sources/...ersDecroissant


michel

[simstef]

Merci à toi !

Je vais éplucher ce lien pour voir si j'y trouves mon bonheur

[simstef]

SilkyRoad,

J'ai testé ton code, mais ca ne semble pas fonctionner.

Il met l'erreur :

Erreur d'exécution '13':
Incompatibilité de type

Il met ça sur la ligne :

Code :

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

If CDate(Tableau(2, i)) < CDate(Tableau(2, i + 1)) Then

Etant donné que je ne connais pas beaucoup ces fonctions, je ne sais pas d'ou vient le problème. Est-ce que tu as une idée de ce qui peut provoquer cette erreur stp ?

Merci d'avance

[SilkyRoad]

bonsoir

je suis désolé mais je ne réussis pas à reproduire ton message d'erreur.


michel