Copy Paste Template d'une feuille a une autre multiple fois

Bonjour à tous,

Je suis entrain d'essayer d'apprendre mais mes bases VBA sont encore très basse, donc je n'ai pas encore trouver de solutions.

Mon problème est que je voudrais copier les cases encadrées dans ma feuille "Templates", le nombre de fois que les cases pilotes sont remplies (résultat en D2), à la chaînes (vers le bas) à partir de la case E1 sur ma feuille "Materiel-Pneu".

J'ai joint ici mon fichier pour plus de materiel sur quoi travailler.

Merci d'avance.

Bonjour Danisismique, le forum,

Un essai de ce que j'ai compris......sous réserve que cela fonctionne sous MAC....

Sub Bouton1_Cliquer()
 Dim plage As Range, c As Range, dl%
  Set plage = Sheets("Templates").Range("A1:O11")

   Application.ScreenUpdating = False

   With Sheets("Materiel-Pneu")
    dl = 1
    For Each c In .Range("B3:B10")
     If c.Value <> "" Then
      plage.Copy .Range("E" & dl): .Range("F" & dl + 2) = c.Value
     End If
      dl = dl + 11
    Next c
   End With

    Application.ScreenUpdating = True
End Sub

Cordialement,

Merci Beaucoup.

Tout fonctionne comme je l'avais imaginer !