Besoin d'aide vba excel

Bonjour,
j'ai un projet de GSI à réaliser et je galère sur une astuce que je n'ai toujours pas trouver malheureusement!
j'explique mon problème : en gros j'ai 5 feuilles excel "menu", "fiche arrivée", "fiche départ", "facture", "récapitulatif", et j'ai déjà créé un bouton reset dans le récapitulatif afin de supprimer des données préexistante (à la fin de le journée, l'employé imprime le récapitulatif et le remet à zéro en gros) :

Sub reset()
Range("A6:D36").Select
Selection.ClearContents
End Sub


Maintenant il me reste a créé un bonton "resetall" afin de supprimer plusieur cellules dans plusieurs feuilles... le problème est que j'ai une erreure 400 qui s'affiche tout le temps même en essayant beaucoup de solution différentes( enlever les worksheets, changer de feuille de macro...) RIEN NE VA! :

Sub resetall()
Worksheets("fiche arrivée").Range("C5:C10").Select
Worksheets("fiche départ").Range("B3:B11").Select
Worksheets("facture").Range("C6:C12").Select
Selection.ClearContents
End Sub


MERCI de me donner de votre attention afin de m'aider svp

ps : je peux communiquer le fichier Excel sans problème, il suffit de me demander si besoin