Macro pour aller à la ligne

Bonjour,

Je possède le code suivant qui va copier-coller les info d'une feuille à une autre. Ce que j'aimerais faire, c'est qu'au lieu que mon collage se fasse en cellule A2 de ma Feuil2, qu'il se fasse plutôt à partir de la dernière ligne dans laquelle il y a des données. Si par exemple en Feuil2 j'ai des données en ligne 150, que la copie se fasse à partir de cette ligne et vienne s'ajouter à un historique de données déjà présent ou non.

Voici mon code :

Sub etape_5()

Sheets("Feuil1").Select

Range("A2:D2").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("Feuil2").Select

Range("A2").Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, transpose:=False

End Sub

Merci d'avance

Bonjour Pablito

remplace

Sheets("Feuil2").Select
Range("A2").Select

par

Sheets("Feuil2").Select
Range("A" & rows.count).end(xlup).offset(1,0).Select

Bonjour Pablito

remplace

Sheets("Feuil2").Select
Range("A2").Select

par

Sheets("Feuil2").Select
Range("A" & rows.count).end(xlup).offset(1,0).Select

Merci beaucoup @Steelson

Rechercher des sujets similaires à "macro aller ligne"