[AC-2003] Récupérer une date

[gigmar03]

Bonjour à tous,

Comment puis-je récupérer une date, sélectionnée à partir de MsCal et l'insérer dans une table ?

Merci de votre aide

[argyronet]

Bonjour,

La propriété Value est à utiliser dans ce cas...

Code :

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub Calendar0_Click()
    With Me.Calendar0
        MsgBox "C'est bien la date du " & .Value & " que vous voulez ?", vbQuestion + vbYesNo, "Confirmez"
        Call MajTable(.Value)
    End With
End Sub
 
Private Sub MajTable(ByVal DateCible As Date)
'Code de UPDATE...
End Sub

Argy