网上有关“excel vba 复选框的问题!”话题很是火热,小编也是针对excel vba 复选框的问题!寻找了一些与之相关的一些信息进行分析,如果能碰巧解决你现在面临的问题,希望能够帮助到您。
方法一
如果是在工作表中使用复选框,右击复选框,在快捷菜单中单击选择“设置控件格式”,打开对话框如下图所示设置:
按Alt+F11打开VBE窗口,插入模块,粘贴如下代码:
Sub 隐藏()
If [L1] = True Then
Columns("B:C").EntireColumn.Hidden = True
Else
Columns("B:C").EntireColumn.Hidden = False
End If
End Sub
再右击复选框单击选择“指定宏”,选定宏“隐藏”。
操作及效果:单击复选框则B:C隐藏或显示。
方法二
如果是在窗体中使用筛选框,则双击窗体上的复选框,出现如下代码框架:
Private Sub CheckBox1_Click()
End Sub
在框架中粘贴如下代码:
If CheckBox1.Value = True Then
Columns("B:C").EntireColumn.Hidden = True
Else
Columns("B:C").EntireColumn.Hidden = False
End If
即变成如下完整代码:
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Columns("B:C").EntireColumn.Hidden = True
Else
Columns("B:C").EntireColumn.Hidden = False
End If
End Sub
打开窗体,单击窗体上的复选框:
⑴未选中复选框时效果如下图示。
⑵选中复选框时效果如下图示。
仅供参考!
请采纳。
将控件与单元格关联即可。
右键设置控件格式。控制里,看到源数据区域,和单元格链接了么?
分别指定即可。
由于返回的是序号,用vlookup函数再查一下源数据区域表即可。
关于“excel vba 复选框的问题!”这个话题的介绍,今天小编就给大家分享完了,如果对你有所帮助请保持对本站的关注!
本文来自作者[直觉]投稿,不代表邵阳号立场,如若转载,请注明出处:https://www.syzq0739.com/saoyan/253.html
评论列表(3条)
我是邵阳号的签约作者“直觉”
本文概览:网上有关“excel vba 复选框的问题!”话题很是火热,小编也是针对excel vba 复选框的问题!寻找了一些与之相关的一些信息进行分析,如果能碰巧解决你现在面临的问题,...
文章不错《excel vba 复选框的问题!》内容很有帮助