MACRO COPIE données d'une feuille à une autre

[urbanito1]

le forum bonjour, les amateurs de macro

j'ai un fichier avec 2 feuilles ( intitulés de colonnes identiques )
la feuille 1 a +-80000 lignes ( année 2014), la feuille 2 a +- 20000 lignes (année 2015)
je souhaiterais pouvoir transférer les données de la feuille 2 vers la feuille 1 suivant la même disposition
je joins mon tableau de simulation
merci
urbanito

 

[jpb388]

Re : MACRO COPIE données d'une feuille à une autre

Bonjour a tous

essaye ceci

Sub test()
    With Sheets("Feuil2")
        .Rows("2:" & .Range("A" & Rows.Count).End(xlUp).Row).Copy Sheets("Feuil1").Range("A" & Sheets("Feuil1").Range("A" & Rows.Count).End(xlUp).Row)
    End With
End Sub

 

[urbanito1]

Re : MACRO COPIE données d'une feuille à une autre

Le forum
jpb388 grand merci
ça marche
j'essaie de faire quelques autres essais avec gros volume
urbanito

 

[JBARBE]

Re : MACRO COPIE données d'une feuille à une autre

Bonjour à tous,

Peut-être ceci !

Bonne journée

 

[jpb388]

Re : MACRO COPIE données d'une feuille à une autre

re
puisque cela fonctionne tu peux l'améliorer comme ceci

Sub test()
    Application.EnableEvents = False
    Application.ScreenUpdating = False
    With Sheets("Feuil2")
        .Rows("2:" & .Range("A" & Rows.Count).End(xlUp).Row).Copy Sheets("Feuil1").Range("A" & Sheets("Feuil1").Range("A" & Rows.Count).End(xlUp).Row)
    End With
    Application.EnableEvents = True
    Application.ScreenUpdating = True
End Sub

 

[urbanito1]

Re : MACRO COPIE données d'une feuille à une autre

le forum,
jbarbe
jpb388
merci je teste
urbanito