dates in dropdown
I would like my user to pick a date from a dropdown
combobox of 30 days. a15=today(), a14=a15-1, a16=a15+1, etc. This gives me a nice list of current dates. The problem is when I pick a date, the format in the dropdown box changes to a number. The dates look fine in my dropdown but when I select one I lose my formatting and only have a number showing. THIA for any suggestions! James James at Landiscomputer.com |
dates in dropdown
Private Sub Combobox1_Click()
Combobox1.Value = Format(clng(Combobox1.Value),"mm/dd/yyyy") End Sub An alternate method would be to use code to load the combobox. for each cell in Range("A1:A15") Combobox1.AddItem cell.Text Next Then the combobox contains strings which will display correctly when selected. -- Regards, Tom Ogilvy "James" wrote in message ... I would like my user to pick a date from a dropdown combobox of 30 days. a15=today(), a14=a15-1, a16=a15+1, etc. This gives me a nice list of current dates. The problem is when I pick a date, the format in the dropdown box changes to a number. The dates look fine in my dropdown but when I select one I lose my formatting and only have a number showing. THIA for any suggestions! James James at Landiscomputer.com |
All times are GMT +1. The time now is 02:08 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com