Excel开发工具按钮应用教程

2023-05-17 综合 29阅读
通过VBA,添加组合框控件,然后通过事件更新,完全可以做到

不过LZ为什么不换个思路啊,为什么一定要用VBA呢,要知道你EXCEL使用VBA,别人用的时候,需要修改宏的安全级别,同时,利用数据有效性,就可以完全可以做到啊。
在某一个单元闹握格(假定为A2)设置数据有效性,下拉菜单中设置op1和op2,供你选择。
然后,在H2输入公式:
=IF(A2="op1",H3,IF(A2="op2",H4,""))

ListBox属于ActiveX 控件,看你的悔衡EXCEL版本,如果03版的话,自行找一下,具体路径忘了,07 10版的话,在EXCEL选项中,找到自定义工具,然后勾选“开发工具”,然后插入这个控件就可以了。需要说明的是,ListBox是一个显示可选项的控件,就像EXCEL一样,它会显示你属于的值,1个或很多个,然后,你选择就可以了。

我简单给你做了个样品,你自己修改吧
第一步,是给控件赋值,也就是将op1和op2显示在ListBox控件中,我通过命令完成的
Private Sub CommandButton1_Click()
With ListBox1
.Clear
.AddItem "op1"
.AddItem "op2"
End With
End Sub

这样,ListBox中就有了这2个选项,不是我们一般的单选或者复选框那种的。

下面就是
选op1时,H2=H3
选op2时,H2=H4
插入代码:
Private Sub ListBox1_Click()
If ListBox1.Value = "op1" Then Range("H2") = Range("H3")
If ListBox1.Value = "op2" Then Range("H2") = Range("H4")
End Sub

至于ListBox选项前,是否需要单选框,请在ListBox属性中设置~

如果对VBA不是很了解的话,可以PM我,我给你发个模板~~

PS:不知道为什么,现在很液前庆多EXCEL用户,用EXCEL的工具或函数就可以解决的,却一定要用VBA。不懂~~
声明:你问我答网所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系fangmu6661024@163.com