Excel组合控件怎么指定不同的宏？

Private Sub ComboBox1_Change()

Application.Run "宏" & Application.Match(Me.ComboBox1.Value, Range("a:a"), 0)

End Sub

• 首选你需要在工作表中插入一个ActiveX控件的combobox（组合框）控件，在属性中设置好ListFillRange和linkedCell。

• 在vbe编辑器中插入模块，分别写每个以地名命名的模块。

• 在写一个combobox的change事件，当组合框的value发生变化时，执行相对应的value的模块。比如下面的代码：

Private Sub ComboBox1_Change()

With Me.ComboBox1

If .Value = "南京" Then Call 南京

If .Value = "北京" Then Call 北京

If .Value = "天津" Then Call 天津

If .Value = "上海" Then Call 上海

End With

以上步骤完成后，当你在组合框中选择性对应的值，就可以执行你需要的宏代码了。