Displaying date formats on Combo Box (ActiveX Control)

[willow1985]

I read an article on how to format a date in a combo box using VBA: How to display date format in combo box output in Excel?

the code for the combo box is:

Private Sub ComboBox_Date()
ActiveSheet.Date_Start.Value = Format(ActiveSheet.Date_Start.Value, "mmmm d,yyyy")
ActiveSheet.Date_End.Value = Format(ActiveSheet.Date_End.Value, "mmmm d,yyyy")
End Sub

Now this works when I manually run the code in VBA however every time I change my selection in the combo box it does not reformat it and the selection goes back to numbers (see below)
Any idea's on how to get the code to run when I make a different selection?

Also, how can I also convert the Linked Cell to a number/date a formula will recognize?

 

[6StringJazzer]

The link you posted answers your first question. Use the Click event to run the macro instead of running it manually. BTW how are you populating the combo box to start with?

Private Sub Date_Start_Click()
    ActiveSheet.Date_Start.Value = Format(ActiveSheet.Date_Start.Value, "mmmm d,yyyy")
End Sub

For the second question, how are you using the linked cell?

 

[willow1985]

I had the click event wrong. Also, not sure what happened but the result on the linked cells will work as long as my formula that is referencing those linked cells/dates compensate for the fact they are a value.

Everything seems to be working.

Thank you very much!

 

[6StringJazzer]

Glad I could help!