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!!

2 réponses

Réponse 1 / 2
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
Réponse 2 / 2
senecartour Messages postés 391 Statut Membre 3
 
Bonjour Gyrus,
C'est exactement ce que je voulais!
Merci infiniment!
0

Discussions similaires

Tukif bloqué ? Solutions express !
Paparazzi -
bzh60 -

5 réponses