Je ne crois pas qu'elle soit si complexe que ça et si c'est le cas tu peux la simplifier car le code est basique, de plus c'est en forgeant que l'on devient forgeron.
Une remarque j'ai supposé que tu utilisais VBA, il est sage de faire précéder les questions par un [VBA] ou [Vb6] ou [VbNET] etc
Si tu utilises ce code il te faudra :
Outils | Références Cocher Microsoft Scripting Runtime
Nommer la zone A2..C65536 en ZoneTri
Affecter un Bouton à TestListeFichiersDansDossier
en mettant auparavant TestListeFichiersDansDossier en Public et non Private
Si recursion Dossier/Sous Dossiers
ListeFichiersDansDossier Dossier, True sinon ListeFichiersDansDossier Dossier, False
Message édité par kiki29 le 27-09-2006 à 23:04:51