derlig = range("A" & rows.count).end(xlup).row
Worksheets("etudiants").Range("A12:J17").Copy _
Destination:=Worksheets("SRA final").Range("B" & Rows.Count).End(xlUp).Row
derlig = Worksheets("SRA final").Range("B" & Rows.Count).End(xlUp).Row
Worksheets("etudiants").Range("A12:J17").Copy _
Destination:=Worksheets("SRA final").Range("B" & derlig + 1)
Private Sub R1_Click()
derlig = Worksheets("SRA final").Range("B" & Rows.Count).End(xlUp).Row
' derniere ligne de la colonne B de la feuille SRA final'
Worksheets("etudiants").Range("A12:J17").Copy _
Destination:=Worksheets("SRA final").Range("B" & derlig + 1)
'copie la plage de cellule A12:J17 dans la feuille etudiants vers la colonne B de la feuille SRA final'
End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question