MS Word 2010 Execute Macros from Dropdown Menu

[dhaines]

I have created a form in word, there is a dropdown menu with three choices. Selecting either of the first two choices needs to run two other macros I created, or selecting the third option needs to run two separate macros. I am new to doing this stuff in word.

From what I can tell there are three types of drop-down controsl in word, a combo box content control (which is what I currently have on the form), and two legacy options, a drop-down form field, or an activex combo box.

Is there a way to execute these macros based on the selection in the combo box content control, or should I be using a different type of field?

I put in an activex combo box, and was able to see the "onchange" event, but I have no experience with activex controls, and am unsure how you would set it's values. I am assuming through vba, but am still looking into that.

Any assistance is appreciated.

Thanks!

[EINSTEIN_007]

You can try to use the Change Event of the ComboBox from the Control Toolbox. For example;

Private Sub ComboBox1_Change()
If ComboBox1.ListIndex > -1 Then Run ComboBox1
End Sub

[dhaines]

Are you referring to using the "Legacy Drop-Down Menu", the "Activex combo box", or the "Content Control Combo Box"?

[Elbanco]

Try the below simplest way to solve this problem. Place this code in the worksheet module, right click on the sheet tab and select view codes, copy and paste this code there.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$1" Then
If Target = "A" Then
macro1
ElseIf Target = "B" Then
macro2
ElseIf Target = "C" Then
macro3
End If
End Sub

F1 assumes to be the drop down menu

[dhaines]

It appears to me your solution would apply to an excel spreadsheet, not a word document?

Something curious, in my testing yesterday, when I insert a "Legacy Drop-Down Menu" I can go in and add the three options I want in the menu, but the control never functions as a drop-down menu, even once the sheet is protected. I don't want to have to protect the sheet, since this disables the use of spell checker, so it appears that using the "Content Control Combo Box" or the "activex combo box" will be my only options. I will continue researching to see if I can figure out the activex control, other wise I have to use xml with the content control, and I have no experience with xml.

Thanks!