[macro] code dézipage et aggeger des fichiers

Bonjour à tous. Je cherche de l'aide car je ne suis pas bon en VBA
J'ai un début de code mais qui ne prend que 2 fichiers et que dans un seul répertoire donc très partiel.
Je recherche une macro qui serai capable de :
- décompacter un fichier zipé contenu dans un sous répertoire (sachant qu'il peut y avoir 1 à X sous répertoire)
- sélectionner dans tous les sous répertoires, sur les 2 fichiers qui viennent d'être décompacté, celui qui n'est pas le compte rendu d'erreur
chaque fichier zipé contient 2 fichiers : l'un avec un nom.csv et l'autre avec un nom-erreur.csv
le fichier nom.csv peut avoir plusieurs tirés mais fini toutjours par -erreur.csv
dans chaque fichier nom.csv (qui peut aussi avoir des tiés mais pas erreur) se trouve des données dont le nombre de lignes est variable
- copier l'ensemble des données de tous ces fichiers sans erreur dans un seul et unique fichier.csv
Merci à vous pour l'aide que vous pouvez m'apporter
Cordialement