Fusion feuilles spécifique de plusieurs classeurs

Bonjours à tous,

J'aurais besoin d'une macro pour un travail qui m'est nécessaire.

J'ai des classeur pour chacun des mois de l'année avec l'année (ex: jour mois année).

Dans chacun de ces classeur il y a une feuille nommée: "TABLEAU DES CHARGES"

J'aimerais regrouper automatiquement ces feuilles dans un seul classeur trimestriel. Ainsi dans un classeur nommé Trimestre 1 "année" avoir les feuilles "TABLEAU DES CHARGES" de janvier, février et mars, et ainsi de suite pour Trimestre 2 "année", Trimestre 3 "année" Trimestre 4 "année".

J'espère que mon explication est suffisamment claire, et vous remercie par avance pour votre aide.

Il suffit de boucler sur les classeurs et copier coller l'onglet en question dans l'activeworkbook...

Sub toto()
For each wb in workbooks
For each ws in wb.worksheets
If ws.name = "TABLEAU DES CHARGES" Then
....