Probleme sur ajout date du jour dans la denommination d'un onglet

[Magnumspy]

Je souhaite renommer un onglet et lui ajouter la date du jour.
Voici les lignes que j'ai creer

Sheets(1).Select
Sheets.Add
Sheets(1).Select
MyStr = Format(Mydate, "dd-mmm")
rep = InputBox("Nom de l'Onglet")
Worksheets(1).Select
Worksheets(1).Name = rep & " " & MyStr

L'onglet ce creer je le nomme et la date se rajoute mais le probleme c'est qu'il me met toujours la date du 30-dec.

Pourrait-on me dire ou cela bloque

Merci

 

[schmail]

Bonsoir Magnumspy

essaye en remplaçant Mydate par Date

@+ et bonnes fêtes

 

[magnumspy]

Super , cela marque enfin la date du jour
Merci Schmail

bonnes fêtes