Bonjour,
j'ai besoin d'un bouton qui copie une plage de D9 à K9 de la feuille "Template correspondance" vers la dernière ligne vide d'une feuille "Liste".J'ai écrit ce code mais il n'a pas marché.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub macro3()
Dim i As Integer
Dim ligne As Integer
 
Sheets("Template correspondance").Select
Range("A9:K9").Copy
 
    Sheets("Liste").Select
    ligne = Sheets("liste").Range("A1048576").End(xlUp).Row
    i = ligne + 1
    Range("A" & i).Paste
 
 
 
End Sub
c'est urgent.Aidez moi svp.