VBA : Tableau récapitulatif à partir de deux feuilles

Bonjour,

J'aimerai généré l'onglet "Recap" à partir des onglets "1", et "2" en automatique via un petit code VBA.

Pouvez vous m'aider ?

Merci d'avance.

bonjour,

une proposition

Sub aargh()
    Set wst = Sheets("recap") ' feuille cible
    wst.Cells.ClearContents
    For Each wsn In Split("1,2", ",") 'liste des feuilles à inclure dans recap
        With Sheets(wsn)
            dl = .Cells(Rows.Count, 1).End(xlUp).Row
            dlt = wst.Cells(Rows.Count, 1).End(xlUp).Row
            If dlt = 1 Then .Rows(6).Copy wst.Cells(1, 1) 'copie entête
            dlt = dlt + 1
            .Rows(7 & ":" & dl).Copy wst.Cells(dlt, 1) ' copie lignes
        End With
    Next
End Sub