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的控件选项 既然是选择控件应该是两个以上组件才能进行选择其一,单个选择控件,没有选择的意义 。
从楼主的上图看,有一个“提交”按扭,应该是“提交”按钮里的有VBA代码读取“入库表”的数据 。而单个“入库表”选择按钮,应该已失去了再选择功能 。
楼主可参考下例:
如图:
即在"选择表"中就有两个选择控件,即一个"入库表"和一个"出库表"选择控件,
在控件编辑状态下,双击任控件按钮,给它们分别输入代码如下:
"入库表"控件代码为: Sheets("入库表").Activate
"出库表"控件代码为: Sheets("出库表").Select
如下图:
然后关闭“VBA代码编辑窗口”,退出"控件编辑" 。选择“入库表”控件,就会进入“入库表”,选择“出库表”控件,就会进入“出库表” 。
【excel控件控件代码怎么写】

excel控件控件代码怎么写

文章插图