一、excel表格怎么设置excel复选框
方法/步骤
为了便于讲解的需要,小编特别制作了如图所示的界面。在该界面中,有两个分类,在每一个类中都可以根据个人的爱好选择一至多项。
点击“开始”-“Excel选项”,在“基本设置”选项卡中勾选右侧的“在功能区上显示‘开发工具’”,使其显示出来。
切换到“开发工具”功能区,点击插入”下拉列表框,在弹出的列表中选择“复选框(ActiveX控件)”。
然后在文档区域拖动以绘制一个复选框。 并在该复选框上右键单击,在弹出的菜单中选择“属性”以打开“属性对话框”。
在打开的“属性对话框”中将“Caption”设置为空,”BackStyle“设置为透明,边框效果设置为0类型,完成后关闭”属性对话框“。结果如图。
确保当前处于“设计模式”下。 在“复选框”上右击选择“复制”,然后右击文档空白处在弹出的菜单中选择“粘贴”即可生成一个新的“复选框”。然后拖动到合适的位置即可。利用同样的复制和粘贴操作完成其它“复选框”的生成操作。结果如图所示。
完成“复选框”的排列后,再次点击“设计模式”以退出设计模式。此时就可以进行任意勾选或取消勾选操作了。如果想要再次编辑“复选框”的话,只需要点击一下“设计模式”就可以进行编辑了。
二、excel怎么插入复选框
在日常办公过程中,我们都会遇到在 Excel 中设计复选框的情况。虽然也有现成的符号可供选择,但是往往显得很呆板,无法实现任意勾选的功能。那么我下面教你们插入可以随便勾选的复选框。
excel插入复选框的步骤:
1.打开EXCEL,点击“文件”中的“选项”,如下图;
2. 在选项界面中点击“自定义功能区”
3.在“自定义功能区”中点击“开发工具”,如下图;
4.在菜单栏出现了“开发工具”,在excel中任意一个位置,点击“插入”选择“复选框”,可以插入复选框。右击复选框可以对文字及复选框进行编辑。
三、excel的复选框在哪
第一步:新建一个excel且设置数据有效性【选中X列--数据--有效性】
第二步:开发工具--查看代码--把代码复制进去保存就OK了
代码如下:
Private Sub Worksheet_Change(ByVal Target As Range)
' Developed by Contextures Inc.
' www.contextures.com
Dim rngDV As Range
Dim oldVal As String
Dim newVal As String
If Target.Count > 1 Then GoTo exitHandler
On Error Resume Next
Set rngDV = Cells.SpecialCells(xlCellTypeAllValidation)
On Error GoTo exitHandler
If rngDV Is Nothing Then GoTo exitHandler
If Intersect(Target, rngDV) Is Nothing Then
'do nothing
Else
Application.EnableEvents = False
newVal = Target.Value
Application.Undo
oldVal = Target.Value
Target.Value = newVal
If Target.Column = 7 Then '这里规定好哪一列的数据有效性是多选的,A列是第1列,依次类推,如3就是C列,7就是G列
If oldVal = "" Then
'do nothing
Else
If newVal = "" Then
'do nothing
Else
If InStr(1, oldVal, newVal) <> 0 Then '重复选择视同删除
If InStr(1, oldVal, newVal) + Len(newVal) - 1 = Len(oldVal) Then '最后一个选项重复
Target.Value = Left(oldVal, Len(oldVal) - Len(newVal) - 1)
Else
Target.Value = Replace(oldVal, newVal & ",", "") '不是最后一个选项重复的时候处理逗号
End If
Else '不是重复选项就视同增加选项
Target.Value = oldVal & "," & newVal
' NOTE: you can use a line break,
' instead of a comma
' Target.Value = oldVal _
' & Chr(10) & newVal
End If
End If
End If
End If
End If
exitHandler:
Application.EnableEvents = True
End Sub