Creation de ligne par rapport a un nombre situé dans une cel

Bonjour à tous

Je souhaite afficher des lignes vierges par rapport à un nombre situé dans une cellule

Je m'explique:

sur la feuille 1

en A1 = date

en B1 = Robert

en C1 = 4

en A2 = date

en B2 = Marc

en C1 = 2

Je souhaite que sur la feuille 2:

en A1 = date (ça c'est facile à faire)

en B1 = Robert (ça c'est facile à faire)

ensuite il doit y avoir le nombre de lignes vierges inscrites en "C1 feuille 1" avant de remplir une deuxième ligne (Marc)

Merci pour votre aide

Bonjour,

Une solution :

Private Sub CommandButton1_Click()

    ligne_insertion_f_2 = 1

    For i = 1 To Range("A1").End(xlDown).Row
        Sheets("Feuil2").Cells(ligne_insertion_f_2, 1) = Cells(i, 1)
        Sheets("Feuil2").Cells(ligne_insertion_f_2, 2) = Cells(i, 2)
        ligne_insertion_f_2 = ligne_insertion_f_2 + Cells(i, 3) + 1
    Next

    Sheets("Feuil2").Activate

End Sub

Et le fichier pour tester cette macro :

Cordialement,