在excel工作表中添加复选框

在excel中，可以插入一些表单控件，比如我们常用的复选框，即可以选择是否打勾小框框。可以在复选框上单击进行打勾或者取消打勾这里介绍两个方法在excel工作表添加复选框。内置控件法和代码批量添加法：
1、使用excel内置的控件来添加复选框方法是单击“开发工具”选项卡=》插入=》表单控件和ActiveX控件下面的“复选框”均可以实现添加复选框。

1513588606106447.png

　　这样，我们就能添加一个复选框了。如果需要批量添加大量的复选框，这种操作显然不科学的。
2、使用VBA代码添加复选框在模块下，添加如下代码：Sub添加复选框()
Application.ScreenUpdating=False
DimrngAsRange
ForEachrngInSelection
Withrng
WithSheet27.CheckBoxes.Add(.Left,.Top,.Width,.Height) '.Select
.Value=xlOff
EndWith
EndWith
Next
Application.ScreenUpdating=True
EndSub然后工作表“sheet27”中，先选中需要添加复选框的单元格区域，然后运行代码，就可以批量添加复选框。注意：代码会在选中的区域中循环添加复选框。