Adapter une macro à une étendue de feuilles

Bonsoir à tous,

Voilà j'ai réalisé un classeur où j'ai un nombre important de feuilles mais elles sont toutes présentées sur le même format (j'ai fais de nombreuses copies de la première).

J'ai commencé à travailler sur un nombre déjà important de ces feuilles, mais je viens de m'apercevoir que le format de certaines cellules ne me convenait pas. Bien sûr j'aurai pu m'en apercevoir avant de faire toutes les copies mais non c'est maintenant que je le vois grrrrr....

Bon j'ai donc pensé faire une macro pour modifier le format des cellules souhaitées sur toutes les pages.
Ne maîtrisant pas VBA, je me suis servi de l'enregistreur de macro pour enregistrer toutes les procédures que je souhaitais faire sur la page.
Par exemple, pour mettre la cellule C18 au format [h]:mm j'obtient cette procédure :

Sub Macro1()
Range("C18").Select
Selection.NumberFormat = "[h]:mm"
End Sub

NB : j'ai fait pas mal d'erreurs et il y a un peu plus de choses en réalité dans la procédure.

Anisi, pour étendre ma macro à toutes les pages souhaitées (en l'occurence de la feuille 2 à la feuille 62), je pensais modifier ma procédure initiale de cette façon :

Sub Macro1()
Dim feuille
For feuille = 2 to 62
Range("C18").Select
Selection.NumberFormat = "[h]:mm"
Next
End Sub

Le souci est que ça ne fonctionne pas.
Que dois-je changer dans ma procédure ?

Merci.
Nemotri.