Report de date calendrierRésolu

Question

Bonjour,

J'ai un bouton qui quand j'appuie dessus me fait apparaître un userform avec dedans un calendrier avec lequel on peut choisir une date, ce que j'aimerais c'est que quand j'ai choisi la date et que j'appuie sur le bouton "OK" ca me remette la date dans la cellule C4 mais j'arrive pas à le faire. Quelqu'un saurait comment faire? merci d'avance

Le calendrier se nomme: DTPicker
Le Userforme: Dateval
Le bouton dans le Userform: OK

Landoltp · Accepted Answer

salut,
merci pour ta réponse ça joue (manquait juste un .value).

Private Sub OK_Click()
    Range("Datevaleur").Value = DateValue(DTPicker.Value)
    Unload Me
End Sub

cs_MPi · Answer

Comme ceci peut-être ?
Comme tu ne sembles pas avoir de problème à afficher le UserForm, il reste le code du bouton OK.

Private Sub OK_Click()
    Range("C4") =  Format(DTPicker.Value, "dd-mmm-yy  ") ' C4 de la feuille active
    Unload Me
End Sub

MPi²

Report de date calendrier

2 réponses

Votre réponse