renommer une feuil avec le résultat d'une formule

[samjeux]

1- A partir d'une date saisie et avec une formule, j'obtiens le numéro de la semaine. Je voudrais renommer automatiquement ma feuille avec le numéro de la semaine obtenu avec la formule.
Je précise que mon classeur contient 6 feuilles : 5 semaines et un récap mois.
2- Comment dans un TCD obtenir automatiquement le nom de la feuille, plutôt qu'élément 1, 2,3...
Comment feriez-vous ? Par avance, merci pour votre aide.

 

[news]

Re : renommer une feuil avec le résultat d'une formule

re:

si la formule de la date se trouve dans range("A1")

Sub modify() '
ActiveSheet.Name = Range("A1").Value
End Sub

peut-être ceci résoud ?,

 

[samjeux]

Re : renommer une feuil avec le résultat d'une formule

Merci pour votre réponse.
Non, malheureusement, cela ne marche pas avec une formule...
Je pense que la macro pourrait marcher en recopiant dans une autre colonne masquée le résultat "brut" de la formule.
Mais il n'existe alors pas d'autres méthodes ?
Ci-joint fichier en question.