Private Sub Combobox1_Click()
if Combobox1.Value = "Other" then
res = Inputbox("enter special selection")
if res < "" then
combobox1.Value = res
End if
End if
End Sub

Make sure the style of the combobox is fmStyleDropDownCombo
This is the default, so if you haven't changed it you should be OK.

--
Regards,
Tom Ogilvy


"HFB" wrote in message
...
yes

"Chip" wrote:

do you know how to make a userform?