Copier / Coller sans écraser

[popoche69]

Bonjour à tous,

je souhaite copier / coller un tableau dans une autre cellule sans écraser les informations déjà présente dans le tableau de destination. Ma macro copier / coller marche mais écrase le tableau :

Worksheets("saisie").Activate
Range("A4:G29").Select
Selection.Copy
Worksheets("test").Activate

Range("A2").Select

ActiveSheet.Paste

Je ne sais pas comment faire pour qu'il copie en dessous des éléments déja présent dans le tableau.

Merci d'avoir regarder mon problème, bonne fin de journée

 

[JNP]

Re : Copier / Coller sans écraser

Bonjour Popoche69 ,
Si j'ai compris

Worksheets("saisie").Activate
Range("A4:G29").Select
Selection.Copy
Worksheets("test").Activate
Range("A65536").End(xlUp).Offset(2, 0).Select
ActiveSheet.Paste

Bonne journée

 

[popoche69]

Re : Copier / Coller sans écraser

yeah, sa marche merci beaucoup Jnp