作者:乔山办公网日期:
返回目录:excel表格制作
1、电脑来打开Excel,然后点击左上角的文件。
2、点击文件后,点击选项。
3、进入Excel选项,进入快速访问工具栏页面,下拉选择开发工具选项卡。
4、选择开发工具选项卡后,找到空间然后点击添加。
5、添加工具后,返回源Excel页面,点击左上角的控件,然后点击插入。
6、点击插入后,选择插入复选框。
7、点击就可以插入复选框。
8、插入复选框后,右键zd点击复选框。
9、按Del键就可以删除,Word也是一样的。
在视图-工具栏-控件工具箱
然后进入设计模式
接下来鼠标点击选择框,然后删除就可以了
你可以遍历OLEObjects对象,再用typeof 方法判知断是否为checkbox 如果是则将其value置为true
代码如下
Private Sub CommandButton2_Click()
For Each obj In ActiveSheet.OLEObjects
If TypeOf obj.Object Is MSForms.CheckBox Then obj.Object.Value = True
Next
End Sub
上面的代码是当你的CommandButton2按下的道时候所有复选框都选中;需要全不选中的话版再建一个按扭代码也是上面的,只需改动权If TypeOf obj.Object Is MSForms.CheckBox Then obj.Object.Value = false就行了
工具栏空白处点右键,打开“控件工具箱”工具栏,点一下第一个按钮,然后就能选中这个复选框了,按 del 键删除,再取消控件编辑状态(再点一次第一个按钮),回复正常编辑