Effectivement j'ai dis une bêtise, merci de me reprendre Pascal76.Pascal76 à dit:EN VBA juste la date du Jour c'est Date
MsgBox Format(Now, "dddd dd mmmm yyyy", vbMonday)
Private Sub UserForm_Initialize() 'à l'initialisation de l'Userform
' labelX.caption = cequetuaschoisis
End Sub