Re : Inséré une ligne sans que certaines cellules soit déplacé
Bonjour Cheenocoma
une methode à tester?
Sheets("Feuil1).Select
numero_derniere_ligne= Range("A65535").End(xlUp).Row
Range(Cells(2, 1), Cells(numero_derniere_ligne, 12)).Select
Selection.Copy
Cells(3, 1).Select
ActiveSheet.Paste
Range(Cells(2, 1), Cells(2, 12)).Select
selection.ClearContent
A+