salut,
essaye le code suivant: copier / coller
'selection des feuilles par le (Nom de l'onglet)
Sheets(Array("Feuil1", "Feuil2", "Feuil3")).Select
Sheets("Feuil1").Activate
'selection des cases
Range("B2:D3").Select
'suppression des valeurs
Selection.Clear
'suppression du groupe de feuille
Sheets("Feuil1").Select
Bonne chance