Macro : créer une synthèse à partir de différents onglets

Bonjour,

Je cherche une macro qui me permette de déverser automatiquement les informations de différents onglets « projets » (trente environ) dans un SEUL autre onglet appelé « tableau de synthèse. »

Dans ce tableau de synthèse, « chaque onglet projet »correspondrait à une ligne.
Tous les « onglets projets » sont en réalité la copie renomée du même template dans lequel on rajoute diverses informations.

J'ai réussi à trouver une première macro qui me permet de créer et renommer nouveaux onglets projets en copiant chaque fois et automatiquement le template de départ.


En revanche, je n'arrive pas à trouver un moyen de lier chaque « onglet projet » à une nouvelle ligne dans le tableau de synthèse, à chaque fois, excel me refait la même ligne en prenant les données du template de départ. Il confond donc le template et sa copie.
Que puis-je faire ?

Merci de votre aide

PS : ci dessous la macro qui bloque :

Sub Macro2()
'
' Macro2 Macro
'

'
Sheets("Tableau de synthèse").Select
Rows("8:8").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
Range("B8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!R[-6]C[4]"
Range("C8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!R[-1]C[5]"
Range("D8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!RC[4]"
Range("E8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!R[1]C[3]"
Range("F8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!R[20]C[2]"
Range("G8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!R[19]C[1]"
Range("H8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!R[21]C"
Range("I8").Select
ActiveCell.FormulaR1C1 = "='Template projet'!R[20]C[1]"
Range("I9").Select
Sheets("Template projet").Select
End Sub