Salut Muqtadir,
à tester
Suprimer juste le contenu
Sub SuprContenuSeul()
Sheets("Import").Cells.ClearContents
Sheets("Traitement des impayés").Rows("2:" & Rows.Count).ClearContents
End Sub
Suprimer contenu et format
Sub SuprContenuEtFormat()
Sheets("Import").Cells.Clear
Sheets("Traitement des impayés").Rows("2:" & Rows.Count).Clear
End Sub
bonne nuit