macro to select drop down

[ChrisK]

Can anyone suggest a macro for a check box to select a drop down box field

I have a check box labeled "insp" When it is checked upon exit it runs a
macro that hides a paragraph of text(which works fine) but I also need the
macro to pick dropdown4 and select its 5th choice on the list

Any ideas?
Thanks

 

[Greg Maxey]

You will need to run a macro on exit from "insp" :

Sub OEChkbox()
Select Case True
Case ActiveDocument.FormFields("insp").Result
ActiveDocument.FormFields("Dropdown4").DropDown.Value = 5
Case Else
ActiveDocument.FormFields("Dropdown4").DropDown.Value = 1 'or whatever
you want selected if the checkbox isn't checked.
End Select
End Sub



--
~~~~~~~~~~~~~~~~~~~~~~~~~~~
Greg Maxey - Word MVP

My web site http://gregmaxey.mvps.org
Word MVP web site http://word.mvps.org~~~~~~~~~~~~~~~~~~~~~~~~~~

 

[ChrisK]

Thanks thats perfect

You will need to run a macro on exit from "insp" :

Sub OEChkbox()
Select Case True
Case ActiveDocument.FormFields("insp").Result
ActiveDocument.FormFields("Dropdown4").DropDown.Value = 5
Case Else
ActiveDocument.FormFields("Dropdown4").DropDown.Value = 1 'or whatever
you want selected if the checkbox isn't checked.
End Select
End Sub



--
~~~~~~~~~~~~~~~~~~~~~~~~~~~
Greg Maxey - Word MVP

My web site http://gregmaxey.mvps.org
Word MVP web site http://word.mvps.org~~~~~~~~~~~~~~~... the list Any ideas? Thanks[/QUOTE] [/QUOTE]