Format date

Bonjour, j'ai un petit problème de format, j'ai recuperer le numéro de la semaine dans la variable "Num" et après j'aimerais bien avoir le format aaaa-ss, cela est-il possible ?

Num= Format(DateAdd(Num, "yyyy-ww"))

Merci

Salut,

Essaye comme ca peut être !

Num = Format(Now, "yyyy-ww", vbSunday)
[A1] = Num

A plus !