Options in a dropdown list

[Guest]

I have created a dropdown list. I have an "Other". If they select the
"Other" I'd like a fill in the blank to appear for them to type the specifics
of their "other". How do I get the blank to appear without always showing it?

 

[Graham Mayor]

You can run a macro on exit from the dropdown field to trap the entry Other
and add the user's choice eg

Sub EnterYourOwn()
Dim oFld As FormFields
Set oFld = ActiveDocument.FormFields
Select Case oFld("Dropdown1").Result
Case Is = "Other"
start:
sText = InputBox("Enter the text for this field")
If sText = "" Then
MsgBox "This field may not be left blank"
GoTo start:
End If
oFld("Dropdown1").Result = sText
Case Else
'Do nothing
End Select
End Sub

http://www.gmayor.com/installing_macro.htm

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>