Effacer le contenu de toutes les cellules en plusieurs pages

débutant

je veux savoir comment faire ?

Effacer le contenu de toutes les cellules en bleu dans la feuil2 feuil3 feuil4

merci

8v2.xlsx (15.49 Ko)

Bonjour,

Sub Macro1()
For Each sh In Sheets(Array("Feuil2", "Feuil3", "Feuil4"))
  sh.Range("C3:G17").ClearContents
Next
End Sub

MERCI INFINIMENT

Rechercher des sujets similaires à "effacer contenu toutes pages"