View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Jez Jez is offline
external usenet poster
 
Posts: 38
Default Get a Date to show as a Date Format in Combo Box

I have a combo Box which can select a date but it just displays as the Number
format, I have this code below to change the format but doesnt seem to do
anything when I select a Date it still shows as a number format.
Where have I gone wrong?

Private Sub cboGetDate_Change()
Dim GetDate As Date
If GetDate = CDate(cboGetDate.Value) Then
cboGetDate.Value = Format(CDate(cboGetDate.Value), "dd/mm/yyyy")
Else
End If
End Sub