Création nouveau onglet à partir d'une liste

Bonjour,

j'ai une liste excel contenant 4 colonnes et un certain nombre de lignes qui font référence à un certain nombre d'inverventions.
j'essaie de créer une macro qui créerait autant de nouvelles feuilles que de lignes dans mon fichier.

j'ai déjà trouvé la macro qui me permet de créer le nombre de feuilles requis. (merci à celle qui l'avait créée)

Dim nombreinterventions, c

For Each c In Range("liste")
nombreinterventions = c.Value
Sheets.Add Count:=1, after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = nombreinterventions
Next c

End Sub

mais les feuilles créés sont vides alors que je souhaiterai qu'elles aient toutes le même format prédéfini et qu'elles reprennent les informations contenues sur la ligne correspondante de la liste principale

exemple pour éclaircir mon propos

liste

date invervention nº description lieu
01/03/09 1 xxxx yyyyy
01/05/09 2 xxxx yyyyy
03/06/09 3 xxxx yyyyy
07/08/09 4 xxxx yyyyy

Dans ce cas il faudrait créer 4 nouveaux onglets à travers la macro et dans chaque onglet figurerait

onglet 1

date 01/ 03 / 09

intervention nº 1

description xxxxx

lieu yyyy

onglet 2

date 01/ 05 / 09

intervention nº 2

description xxxxx

lieu yyyyy

etc......

quelqu'un pourrait-il m'aider à complèter la macro svp!