Word中添加下拉框的方法
4星 · 超过85%的资源 需积分: 50 87 浏览量
2011-12-12
14:59:10
上传
评论 2
收藏 30KB DOC 举报 
在 Word 中插入下拉框的方法：
视图→工具栏→控制工具箱→插入下拉框（组合框）
要在 word 中创建组合框，除了用 "控件工具箱" 将插入组合方块图标按一
下并在页面拉出方块的外形之外，还需要配合程式码才可以应用。请试试以下
方法。
在 word 页面拉出组合方块，右击该方块，选 "检视程式码"，然后在跳出
的程式码页面内加入以下文字：
Private Sub UserForm_Initialize()
'以下各行目的是在组合方块内加入拟出现的选项
ComboBox1.AddItem "1"
ComboBox1.AddItem "2"
ComboBox1.AddItem "3"
End Sub
Private Sub ComboBox1_MouseDown(ByVal Button As Integer, ByVal Shift
As Integer, ByVal X As Single, ByVal Y As Single)
Me.ComboBox1.ListIndex = -1
End Sub
之后把鼠标放到上面 3 行 "ComboBox1.AddIte" 的任一行之内，再按工具
列上的垂直向右蓝色三角形图标一下(运行程序一次)。
最后回到 Word 面，关掉 "控件工具箱"。这时你点一下组合方块便出现 1, 2, 3
共三个选项了。
因为 word 自定义宏是不能自动运行的。
下面，介绍一种可行的方法，让您的宏随文档的打开而自动运行。
您的 word 宏的安全级别设置为中或低。
现在，我们只要在 ThisDocumet 代码中添加默认的自动运行的宏，调用上
述的宏，即可实现自定义宏的运行。
Sub AutoOpen()
Call UserForm_Initialize
End Sub
上述的 Call UserForm_Initialize 就是调用命令。方法是：Call 自定义宏名
资源评论
hktkzyz2012-06-13用这个方法确实实现了，如果能解释一下语句就更好了。因为到最后，我只是实现了，但并没有理解，不过还是谢谢作者。
