word 控件作下拉菜单

word 控件作下拉菜单


经过三天的摸索，嘿，还真找到一点明堂，上午还想放弃求人，下午自己就解决了
操作虽然简单，第一次用还得要费点脑筋；
还是共享吧
建一新模式，并且每次启动自动运行；
建一新文档
运行视图窗口--工具栏--在控件工具箱前打√(选中)
在控件工具栏点击插入组合框
选中插入组合框，右键查寻代码出现VBA编辑框
选docoment和open选项
Private Sub ComboBox1_Change()

End Sub

Private Sub Document_New()

End Sub

Private Sub Document_Open()
　　combobox1.additem "要输入文本"
combobox1.additem "A"
combobox1.additem "B"
combobox1.additem "C"
combobox1.additem "D"
End Sub

输入以上语句后运行－保存
好了搞定