Effacer le contenu des feuilles d'un classeur

Résolu
senecartour Messages postés 391 Statut Membre -  
senecartour Messages postés 391 Statut Membre -
Bonjour,
Je sais comment effacer le contenu d'une feuille nommée. Mais je cherche comment effacer les contenus de toutes les feuilles de mon classeur contenant 12 onglets.
En effet, je souhaiterais, à partir d'un bouton, effacer le contenu de toutes les feuilles sans avoir à associer les noms des onglets à ma macro.
Merci d'avance pour votre aide!!

--
Partager son savoir est la meilleure façon d'apprendre!

2 réponses

  1. Gyrus Messages postés 3360 Statut Membre 526
     
    Bonjour,

    Sub EffacerTout()
    Dim Sh As Worksheet
    For Each Sh In Worksheets
    Sh.Cells.ClearContents
    Next Sh
    End Sub

    A+
    0
  2. senecartour Messages postés 391 Statut Membre 3
     
    Bonjour Gyrus,
    C'est exactement ce que je voulais!
    Merci infiniment!
    0