Macro qui fonctionne meme si le nom de l'onglet change

Bonjour

Voir fichier joint, j'ai crée cette macro qui se retrouve dans l onglet feuill4 et elle fonctionne mais les noms des autres onglets ( de date) changeront donc je voudrais que cette macro fonctionne en ignorant le nom des onglets.

Est ce possible?

Mille mercis de votre aide

Bonjour

Sub effacer()
For i = 2 To Sheets.Count
Sheets(i).Range("B59:H84").ClearContents
Next i
End Sub

Amicalement

Nad

Mille mercis Nad!!

You rock!