excel控件代码怎么写

1. excel按钮控件怎么写代码 通过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 = "http://www.xuexi88.com/zhishi/op1" Then Range("H2") = Range("H3")
If ListBox1.Value = "http://www.xuexi88.com/zhishi/op2" Then Range("H2") = Range("H4")
End Sub
至于ListBox选项前,是否需要单选框,请在ListBox属性中设置~
2. excel按钮控件怎么写代码【excel控件代码怎么写】 通过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 = "http://www.xuexi88.com/zhishi/op1" Then Range("H2") = Range("H3")
If ListBox1.Value = "http://www.xuexi88.com/zhishi/op2" Then Range("H2") = Range("H4")
End Sub
至于ListBox选项前,是否需要单选框,请在ListBox属性中设置~

excel控件代码怎么写

文章插图