One easy way is to load the combobox with Strings rather than using the
rowsource properties.

for each cell in Worksheets("Sheet1").Range("A1:A10")
userform1.combobox1.AddItem cell.Text
Next

You can do this in the Initialize event of the userform.

--
Regards,
Tom Ogilvy

"goa" wrote in message
m...
When I use a Dropdown-Combo listing dates in an Excel-Userform , the
choosen date is formatted into integer instead of date (38048 instead
of 02.03.2004), when the dropdown-combo collapses.
How can I format into date?