Macro copier coller sur une autre feuille

[clo131]

bonjour

je souhaiterai copier une tableau avec des données (chiffres) sur une autre feuille mais directement a la ligne du dessous vide

comment faire

 

[ftho]

Re : Macro copier coller sur une autre feuille

Bonjour,

Pour trouver la première ligne vide de la colonne A par exemple c'est

Sheets("NomFeuille").Cells(Rows.Count, 1).End(xlUp)(2)

 

[RENAUDER]

Re : Macro copier coller sur une autre feuille

Bonjour,
Quelque chose comme cela

Sub Macro1()
    Sheets(1).Activate
    Range("A1").CurrentRegion.Select
    Selection.Copy
    Sheets(2).Activate
    Range("A65536").End(xlUp).Offset(1, 0).Select
    ActiveSheet.Paste
End Sub

 

[ftho]

Re : Macro copier coller sur une autre feuille

ce qui pourrait se résumer à

Sub Macro1()
Sheets(1).Range("A1").CurrentRegion.Copy Sheets(2).Range("A65536").End(xlUp)(2)
End Sub

Les "Select" et "Activate" ne sont pas nécessaires 😉

 

[clo131]

Re : Macro copier coller sur une autre feuille

J'ai essayé mais pas moyen je vous joint un fichier
merci par avance

 

[ftho]

Re : Macro copier coller sur une autre feuille

Bonjour,

Si c'est pour copier la dernière ligne de la feuille 1, vers la 1ère ligne vide de la feuille 2 c'est

Sub test()
Sheets(1).Rows(Cells(Rows.Count, 1).End(xlUp).Row).Copy Sheets(2).Cells(Rows.Count, 1).End(xlUp)(2)
End Sub