combobox laat in lijst de datums zien maar en het gekozen rsultaat niet????

[sylvester-ponte]

hallo

mijn combobox laat in lijst de datums zien maar en het gekozen rsultaat niet????

daar geldt de format niet meer.

is er een eigenschap in de combobox die dit hersteld ?

wat kan ik er aan doen?
ik kan natuurlijk in en extra kolom de datums in strings om zetten.
en daar de combobox op zetten.
maar dat liever niet.

groet sylvester

 

[wampier]

Dat is een beetje afhankelijk van wat je met de data later wil doen. Als het puur visueel is, werkt dit:

Private Sub ComboBox1_Change()

If ComboBox1.ListIndex <> -1 Then
    ComboBox1.Value = Format(ComboBox1.List(ComboBox1.ListIndex, 0), "DD-MM-YYYY")
End If

End Sub

 

[HSV]

Of:

Private Sub ComboBox1_Change()
 ComboBox1 = CDate(ComboBox1)
End Sub

 

[sylvester-ponte]

Wampier en HSV bedankt voor de reacties:thumb:

het werkt prima zo met een beetje vba.

maar ik had eigenlijk gehoopt dat ik ergens een format instelling over het hoofd heb gezien.

groet sylvester