Excel 复选框：在 Excel 中添加、选择、删除和使用复选框作者晓阳•修改日期2025-03-31 1. 两种类型的复选框（复选框表单控件与复选框 ActiveX 控件）2. 在 Excel 中添加一个或多个复选框2.1 插入一个复选框2.2 插入多个复选框 使用填充柄选项插入多个复选框 使用 VBA 代码插入多个复选框 使用便捷功能插入多个复选框3. 修改复选框的名称和标题文本4. 将一个或多个复选框链接到指定单元格4.1 使用“设置控件格式”功能将一个复选框链接到单元格4.2 使用 VBA 代码一次性将多个复选框链接到单元格5. 勾选一个或多个复选框5.1 通过右键单击选择一个复选框5.2 通过按住 Ctrl 键选择多个复选框6. 删除一个或多个复选框6.1 使用 VBA 代码删除多个复选框6.2 使用简单功能删除多个复选框7. 在 Excel 中对复选框进行分组7.1 使用“组合”功能对复选框进行分组7.2 使用“组合框”命令对复选框进行分组8. 示例：如何在 Excel 中巧妙运用复选框示例 1：使用复选框创建待办事项列表示例 2：使用复选框创建动态图表 在 Excel 中使用复选框创建交互式图表 使用简易功能通过复选框创建交互式图表示例 3：使用复选框创建下拉列表 使用列表框通过复选框创建下拉列表 使用强大功能通过复选框创建下拉列表示例 4：勾选复选框以更改行颜色 勾选复选框以使用使用条件格式更改行颜色 勾选复选框以使用 VBA 代码更改行颜色示例 5：如果复选框被勾选，则对单元格值进行计数或求和示例 6：如果复选框被勾选，则返回特定值复选框是一种用于勾选或取消选项的交互式工具，常见于网页表单和调查问卷中。在 Excel 中，通过勾选或取消复选框，您能为工作表注入更多可能性，使其更加动态且富有交互性——例如创建清单、插入动态图表等。
在本教程中，我将为您详细介绍如何在 Excel 中插入、选择和删除复选框，并附上实用的操作示例。
目录：
1. 两种类型的复选框（复选框表单控件与复选框 ActiveX 控件）
2. 在 Excel 中添加一个或多个复选框
2.1 插入一个复选框2.2 插入多个复选框 使用填充柄选项插入多个复选框 使用 VBA 代码插入多个复选框 使用便捷功能插入多个复选框3. 修改复选框的名称和标题文本
4. 将一个或多个复选框链接到指定单元格
4.1 使用“设置控件格式”功能将一个复选框链接到单元格4.2 使用 VBA 代码一次性将多个复选框链接到单元格5. 勾选一个或多个复选框
5.1 通过右键单击选择一个复选框5.2 通过按住 Ctrl 键选择多个复选框6. 删除一个或多个复选框
6.1 使用 VBA 代码删除多个复选框6.2 使用简单功能删除多个复选框7. 在 Excel 中对复选框进行分组
7.1 使用“组合”功能对复选框进行分组7.2 使用“组合框”命令对复选框进行分组8. 示例：如何在 Excel 中巧妙运用复选框
示例 1：使用复选框创建待办事项列表示例 2：使用复选框创建动态图表 在 Excel 中使用复选框创建交互式图表 使用简易功能通过复选框创建交互式图表示例 3：使用复选框创建下拉列表 使用列表框通过复选框创建下拉列表 使用强大功能通过复选框创建下拉列表示例 4：勾选复选框以更改行颜色 勾选复选框以使用使用条件格式更改行颜色 勾选复选框以使用 VBA 代码更改行颜色示例 5：如果复选框被勾选，则对单元格值进行计数或求和示例 6：如果复选框被勾选，则返回特定值 两种类型的复选框（复选框表单控件与复选框 ActiveX 控件）要插入复选框，请确保功能区中已显示“开发工具”选项卡。“开发工具”选项卡默认处于隐藏状态，因此您需要先将其启用。
1. 在 Excel 工作表中，请单击文件 > 选项。在 Excel 选项对话框中，单击自定义功能区，勾选开发工具选项，然后单击确定按钮关闭此对话框。
2. 现在，开发工具选项卡会出现在 Excel 功能区中，如下图所示。您可以根据需要，从该选项卡轻松访问各种交互式控件。
Microsoft Excel 提供两种类型的复选框：复选框表单控件和 复选框 ActiveX 控件：
复选框表单控件比复选框 ActiveX 控件简单得多，而复选框 ActiveX 控件在设计上更灵活，可作为代码中的对象使用。日常办公中，表单控件已完全够用，因此我们通常优先选用它们。
复选框表单控件与复选框 ActiveX 控件对比：
ActiveX 控件提供更多的格式设置选项，可用于实现更精致灵活的设计；表单控件内置于 Excel 中，而 ActiveX 控件是单独加载的，因此偶尔可能会冻结；某些计算机默认不信任 ActiveX 控件，因此您需要从信任中心中手动启用它们；复选框 ActiveX 控件可通过 VBA 编辑器以编程方式访问；ActiveX 仅在 Windows 系统中提供，Mac OS 不支持此功能。注意：以下教程中提到的所有复选框均为复选框表单控件。
在 Excel 中添加一个或多个复选框想插入一个或多个复选框？本节内容或许正是您需要的！
2.1 插入一个复选框要插入复选框，请按以下步骤操作：
1. 单击开发工具选项卡，然后单击控件组中的插入，接着在表单控件下选择复选框。随后，单击您要插入复选框的单元格，复选框将出现在该单元格附近，如下图所示：
2. 将光标置于复选框边缘，待其变为移动指针后，即可单击并拖动至目标单元格，如下图所示：
2.2 插入多个复选框如果您的工作表中需要插入多个复选框，以下将为您介绍几种高效快捷的方法。
使用填充柄选项插入多个复选框要快速插入多个复选框，请先按上述方法添加一个复选框，然后拖动填充柄将其复制到其他单元格。
1. 点击包含复选框的单元格即可选中。
2. 向下拖动填充柄即可填充复选框，如下图所示：
使用 VBA 代码插入多个复选框以下 VBA 代码也能助您快速、轻松地批量插入复选框。请按以下步骤操作：
1. 按住 ALT + F11 键，即可打开 Microsoft Visual Basic for Applications 窗口。
2. 然后，单击插入 > 模块，并将以下代码粘贴到模块窗口中。
VBA 代码：在单元格列表中插入多个复选框
Sub InsertCheckBoxes()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Ws As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Ws = Application.ActiveSheet
Application.ScreenUpdating = False
For Each Rng In WorkRng
With Ws.CheckBoxes.Add(Rng.Left, Rng.Top, Rng.Width, Rng.Height)
.Characters.Text = Rng.Value
End With
Next
WorkRng.ClearContents
WorkRng.Select
Application.ScreenUpdating = True
End Sub
3. 按下 F5 键运行此代码，系统将弹出提示框，提醒您选择要插入复选框的单元格区域。如下图所示：
4. 然后，单击确定按钮，复选框将立即整齐地插入到单元格中，如下图所示：
使用便捷功能插入多个复选框如果您已安装 Kutools for Excel，即可借助其批量插入复选框功能，立即将复选框插入空白单元格或包含数据的单元格中。
Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息…… 免费试用……1. 选择要插入复选框的单元格区域。
2. 然后，单击 Kutools > 插入 > 批量插入复选框，如下图所示：
3. 随后，所选单元格将被复选框填充，如下图所示：
在空白单元格中插入复选框 在数据单元格中插入复选框 Kutools for Excel——通过 300 多款必备工具全面增强 Excel 功能，助您工作更快速、更轻松，并借助 AI 功能实现更智能的数据处理与高效办公！立即获取
更改复选框名称和标题文本在 Excel 中使用复选框时，您需要区分复选框名称与标题名称：标题名称是显示在复选框旁边的文本，而复选框名称则是选中该复选框后在名称框中显示的名称，如下图所示：
复选框名称 标题名称 要更改标题名称，请右键单击复选框，然后从上下文菜单中选择编辑文字，并输入您所需的新建名称，如下图所示：
要更改复选框名称，请先选中复选框，然后在名称框中输入所需名称，如下图所示：
将一个或多个复选框链接到单元格使用复选框时，通常需要将其链接到单元格：选中时，单元格显示 TRUE；取消选中时，则显示 FALSE 或留空。本节将为您介绍如何在 Excel 中将一个或多个复选框链接到单元格。
4.1 使用设置控件格式功能将一个复选框链接到单元格要将复选框关联到特定单元格，请按以下步骤操作：
1. 右键单击复选框，然后从上下文菜单中选择设置控件格式，如下图所示：
2. 在设置对象格式对话框中，切换到控制选项卡，点击单元格链接框，选择要链接到复选框的单元格，或手动输入单元格引用，如下图所示：
3. 单击确定关闭对话框，此时复选框已链接到指定单元格：选中时显示 TRUE，取消选中时显示 FALSE，如下图演示所示：
4.2 使用 VBA 代码将多个复选框链接到单元格若使用“设置控件格式”功能将多个复选框逐一链接到单元格，需重复上述步骤多次；当需要链接数百甚至数千个复选框时，这一过程将极为耗时。为此，我将为您介绍一段 VBA 代码，可一次性批量完成多个复选框与单元格的链接。
1. 转到包含复选框的工作表。
2. 按住 ALT + F11 键，即可打开 Microsoft Visual Basic for Applications 的窗口。
3. 然后，单击插入 > 模块，并将以下代码粘贴到模块窗口中。
VBA 代码：一次性将多个复选框链接到单元格
Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "C"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
Cells(i, xCChar).Value = True
Else
Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub
注意：在此代码中，i = 2，数字 2 表示复选框的起始行；而 xCChar = "C"，字母 C 表示您希望将复选框链接到的列。您可以根据实际需求灵活调整。
4. 按 F5 键运行此代码，即可一次性将活动工作表中的所有复选框链接到指定单元格：勾选复选框时，关联单元格显示 TRUE；取消勾选时，链接单元格则显示 FALSE，如下图所示：
选择一个或多个复选框要在工作表中复制或删除复选框，请先选中它们。要选择一个或多个复选框，请按以下步骤操作：
选择单个复选框：（两种方法）
右键单击复选框，然后在其中任意位置单击。或按住 Ctrl 键，再单击复选框。选择多个复选框：
按住 Ctrl 键，然后逐个单击要选择的复选框。
删除一个或多个复选框删除单个复选框对我们来说轻而易举——只需选中它，再按下键盘上的 Delete 键即可。但如果是多个复选框，您又该如何在 Excel 中高效操作呢？
6.1 使用 VBA 代码删除多个复选框要删除工作表中的所有复选框，只需运行以下 VBA 代码即可。
1. 按住 ALT + F11 键以打开 Microsoft Visual Basic for Applications 窗口。
2. 然后，单击插入 > 模块，并将以下代码粘贴到模块窗口中。
VBA 代码：删除当前工作表中的所有复选框
Sub RemoveCheckboxes()
'Update by Extendoffice
On Error Resume Next
ActiveSheet.CheckBoxes.Delete
Selection.FormatConditions.Delete
End Sub
3. 然后，按下 F5 键即可执行代码，一次性删除特定工作表中的所有复选框。
6.2 使用简单功能删除多个复选框通过 Kutools for Excel 的批量删除复选框功能，您只需点击几下，即可轻松从选定区域或整个工作表中删除所有复选框！
Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息…… 免费试用……1. 选择包含要删除复选框的单元格区域或整个工作表。
2. 然后，单击 Kutools > 删除 > 批量删除复选框，见下图：
3. 随后，所有复选框将一次性从所选区域中移除。
在 Excel 中对复选框进行分组当您需要同时移动或调整多个复选框的大小时，将它们分组可让您一次性轻松掌控所有复选框。本节将为您介绍如何在 Excel 工作表中对多个复选框进行分组。
7.1 使用“组合”功能对复选框进行分组在 Excel 中，组合功能可帮助您对多个复选框进行分组，请按以下操作：
1. 按住 Ctrl 键，逐个单击要分组的复选框，如下图所示：
2. 然后，右键单击并从上下文菜单中选择组合> 组合，如下图所示：
3. 所有选中的复选框分组后，您即可一次性移动或复制它们。
7.2 使用“组合框”命令对复选框进行分组此外，您还可以使用组合框将多个复选框组合在一起。请按以下步骤操作：
1. 转到开发工具选项卡，然后单击插入> 组合框（表单控件），如下图所示：
2. 然后，拖动鼠标绘制一个组合框，并根据需要修改其标题名称：
3. 现在，您可以将复选框插入组合框中：点击开发工具> 插入> 复选框（表单控件），见下图：
4. 然后拖动鼠标绘制一个复选框，并根据需要修改其标题名称，如下图所示：
5. 类似地，将其他复选框插入组合框中，即可获得如下图所示的结果：
示例：如何在 Excel 中使用复选框通过上述内容，我们已掌握了复选框的基础知识。本节将为您介绍如何在 Excel 中利用复选框实现交互式与动态操作。
示例 1：使用复选框创建待办事项列表待办事项列表能有效标记日常工作中已完成的任务。在典型的待办事项列表中，已勾选的完成项会以删除线格式显示，如下图所示。借助复选框，您可快速创建一个交互式待办事项列表。
要使用复选框创建待办事项列表，请按以下步骤操作：
1. 请在要使用的单元格列表中插入复选框，如下图所示：（单击此处了解如何批量插入复选框）
2. 插入复选框后，请将每个复选框链接到一个独立的单元格。
提示：要将复选框链接到单元格，您可以使用控件格式功能逐个链接，或应用 VBA 代码一次性全部链接。3. 将复选框链接到单元格后，勾选时显示 TRUE，未勾选时显示 FALSE，如下图所示：
4. 接下来，使用条件格式功能执行以下步骤：选择要创建待办事项列表的单元格区域 A2:C8，然后单击开始 > 条件格式 > 新建规则，即可打开新建格式规则对话框。
5. 在新建格式规则对话框中，先在选择规则类型列表框中单击使用公式确定要设置格式的单元格，然后在为此公式为真时设置格式值文本框中输入 =C2=TRUE，见下图：
注意：C2 是链接到复选框的单元格。
6. 然后，单击格式按钮，进入设置单元格格式对话框。在字体选项卡的效果部分，勾选删除线，并按需为已完成的待办事项指定颜色，如下图所示：
7. 然后，单击确定关闭对话框。现在，当您勾选复选框时，其对应的项目将以删除线格式显示，如下方演示所示：
示例 2：使用复选框创建动态图表有时，您可能需要在一张图表中展示大量数据和信息，导致图表显得杂乱。此时，您可以在工作表中通过复选框创建动态图表：勾选某个复选框，对应的数据线即会显示；取消勾选，该数据线则自动隐藏，如下方演示所示。
本节将为您介绍两种在 Excel 中快速创建此类图表的实用技巧。
在 Excel 中使用复选框创建交互式图表通常，在 Excel 中，您可以通过以下步骤结合复选框创建动态图表：
1. 插入多个复选框并重命名。本例中，我将插入三个复选框，分别命名为 Apple、Orange 和 Peach，如下图所示：
2. 接下来，您需要将这些复选框链接到单元格。请单击选择第一个复选框，右键单击后选择设置控件格式。在设置对象格式对话框中，切换到控制选项卡，在单元格链接框中选择一个用于链接复选框的单元格，如下图所示：
3. 重复上述步骤，将另外两个复选框分别链接到不同的单元格。现在，勾选复选框时将显示 TRUE，取消勾选则显示 FALSE，如下方演示所示：
4. 插入并链接复选框后，接下来需准备数据：将原始数据的行号和列标复制到其他位置，如下图所示：
5. 然后应用以下公式：
在单元格 B13：=IF($B$6,B2,NA())，并拖动填充柄将公式填充至 B13 到 G13 行；在单元格 B14：=IF($B$7,B3,NA())，并拖动填充柄将公式填充至 B14 到 G14 行；在单元格 B15 中输入公式：=IF($B$8,B4,NA())，然后拖动填充柄将公式填充至 B15 到 G15 区域。如果对应产品的复选框被勾选，这些公式将返回值自原始数据；如果未勾选，则显示#N/A。参见截图：
6. 然后，选中从 A12 到 G15 的新数据区域，接着单击插入> 插入折线图或面积图> 折线图 以插入折线图。
7. 现在，勾选产品复选框即可显示其对应的数据线，取消勾选则数据线立即消失，如下方演示所示：
8. 创建图表后，可将复选框添加到图表上，让布局更整洁。单击选中绘图区，然后拖动以缩小其尺寸，如下图所示：
9. 按住 Ctrl 键，选择三个复选框并拖动到图表上，然后右键单击，选择置于顶层> 置于顶层，如下图所示：
10. 此时，复选框已显示在图表上。继续按住 Ctrl 键，依次选择复选框和图表，右键单击后选择组合> 组合，如下图所示：
11. 现在，复选框已与折线图关联——移动图表时，复选框将自动跟随，布局更灵活！
使用简易功能通过复选框创建交互式图表上述方法对您来说可能稍显复杂，接下来我将介绍一种更简便的方法来完成此任务。借助 Kutools for Excel 的复选框折线图功能，即可轻松创建带复选框的动态图表。
Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息…… 免费试用……1. 选择要创建图表的数据区域，然后单击 Kutools > 图表 > 类别对比 > 复选框折线图，如下图所示：
2. 随后将弹出复选框折线图对话框，所选数据将自动填入各个文本框中，如下图所示：
3. 然后，单击确定按钮，系统将弹出提示框，提醒您将创建一个包含中间数据的隐藏工作表，请单击是按钮，如下图所示：
4. 此时，带复选框的折线图已成功创建，如下图所示：
Kutools for Excel——通过 300 多款必备工具全面增强 Excel 功能，助您工作更快速、更轻松，并借助 AI 功能实现更智能的数据处理与高效办公！立即获取
示例 3：使用复选框创建下拉列表从下拉列表中选择多个项目是许多用户的常见需求。有些用户尝试创建带复选框的下拉列表来实现多选功能，如下方演示所示。遗憾的是，Excel 本身并不支持直接创建带复选框的下拉列表。不过，本文将为您介绍两种在 Excel 中实现多选复选框的有效方法：一种是使用带复选框的列表框，另一种则是模拟带复选框的下拉列表。
使用列表框创建带复选框的下拉列表您可以使用列表框替代下拉列表，以添加复选框实现多选功能。该过程稍显复杂，请按以下步骤逐步操作：
1. 首先，请插入一个列表框：单击开发工具> 插入> 列表框（ActiveX 控件），如下图所示：
2. 拖动鼠标绘制列表框，然后右键单击，在上下文菜单中选择属性，如下图所示：
3. 在属性窗格中，请按以下方式设置操作：
在 ListFillRange 框中，输入您希望在列表框中显示的数据区域；在 ListStyle 框中，从下拉菜单中选择 1 - fmListStyleOption；在 MultiSelect 框中，从下拉菜单中选择 1 – fmMultiSelectMulti；最后，单击关闭按钮将其关闭。
4. 然后，单击您希望显示多个选中项目数量的单元格，并为其指定一个名称。在名称框中输入“Outputitem”，然后按 Enter 键，如下图所示：
5. 接下来，单击插入> 形状> 矩形，然后在列表框上方拖动鼠标绘制一个矩形，如下图所示：
6. 右键单击矩形，从上下文菜单中选择指定宏，如下图所示：
7. 在指定宏对话框中，点击如下图所示的新建按钮：
8. 在打开的 Microsoft Visual Basic for Applications 窗口中，将模块窗口中的原始代码替换为以下 VBA 代码：
Sub Rectangle1_Click()
'Updated by Extendoffice
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
xLstBox.Visible = True
xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
xStr = ""
xStr = Range("Outputitem").Value
If xStr <> "" Then
xArr = Split(xStr, ";")
For I = xLstBox.ListCount - 1 To 0 Step -1
xV = xLstBox.List(I)
For J = 0 To UBound(xArr)
If xArr(J) = xV Then
xLstBox.Selected(I) = True
Exit For
End If
Next
Next I
End If
Else
xLstBox.Visible = False
xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
For I = xLstBox.ListCount - 1 To 0 Step -1
If xLstBox.Selected(I) = True Then
xSelLst = xLstBox.List(I) & ";" & xSelLst
End If
Next I
If xSelLst <> "" Then
Range("Outputitem") = Mid(xSelLst, 1, Len(xSelLst) - 1)
Else
Range("Outputitem") = ""
End If
End If
End Sub
注意：在上述代码中，Rectangle 1 是形状名称，ListBox 1 是列表框名称，Outputitem 是输出单元格的名称。您可以根据需要自由更改这些名称。
9. 然后关闭代码窗口。现在，点击矩形按钮即可隐藏或显示列表框；当列表框显示时，在其中选择项目，再次点击该按钮，即可将所选项目数量输出到指定单元格，如下方演示所示：
使用一项强大功能创建带复选框的下拉列表借助功能强大的 Kutools for Excel，您可轻松在真正的下拉列表中插入复选框。其“为下拉列表添加复选框”功能，让您快速创建支持多选的下拉菜单（带复选框）——这一功能原生 Excel 并不支持。不仅大幅增强列表的功能性，更显著提升工作效率与用户体验。
Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息…… 免费试用……1. 首先，请在所选单元格中插入普通下拉列表，参见截图：
2. 单击 Kutools > 下拉列表 > 启用高级下拉列表。然后，再次从下拉列表中单击“给下拉列表增加复选框”。参见截图：
3. 在“给指定下拉列表增加复选框”对话框中，请按以下方式配置：
2.1）选择包含下拉列表的单元格；2.2）在分隔符框中，输入用于分隔多个项目的分隔符；2.4）单击“确定”按钮。从现在起，当您单击包含下拉列表的单元格时，会弹出一个带复选框的列表，勾选复选框即可将所选项输出到单元格中，如下方演示所示：
提示：如果在对话框中勾选启用搜索功能选项，即可在下拉列表中进行搜索，如下方截图所示：示例 4：勾选复选框以更改行颜色您是否尝试过根据勾选的复选框动态更改行颜色？也就是说，当您勾选某个复选框时，对应行的颜色会自动更新（如下方截图所示）。本节将为您介绍几种在 Excel 中实现这一效果的实用技巧。
使用使用条件格式勾选复选框以更改单元格颜色要在 Excel 中通过勾选或取消勾选复选框来更改行颜色，请使用条件格式功能。请按以下步骤操作：
1. 首先，根据需要在单元格列表中插入复选框，参见截图：
2. 接下来，您需要将这些复选框分别链接到其旁边的单元格，具体操作请参见截图：
提示：要将复选框链接到单元格，您可以使用控件格式功能逐个链接到单元格，或应用 VBA 代码一次性全部链接到单元格。
3. 然后，选择您要更改行颜色的数据区域，再单击开始 > 使用条件格式 > 新建规则，参见截图：
4. 在新建格式规则对话框中，执行以下操作：
在选择规则类型框中，选择使用公式确定要设置格式的单元格选项；将此公式 =IF($F2=TRUE,TRUE,FALSE) 输入到为此公式为真时设置格式的值框中；单击格式按钮，即可为行设置您喜欢的颜色。注意：在公式中，$F2 是复选框所链接的第一个单元格。
5. 选择颜色后，单击确定关闭对话框。现在，当您勾选一个复选框时，对应的行将自动高亮显示，如下方演示所示：
勾选复选框以使用 VBA 代码更改行颜色以下 VBA 代码也可以帮助您根据勾选的复选框更改行颜色，请使用以下代码：
1. 在您希望使用复选框高亮行区域的工作表中，右键单击工作表标签，然后从右键菜单中选择查看代码。参见截图：
2. 将下方代码复制并粘贴到已打开的 Microsoft Visual Basic for Applications 窗口中：
VBA 代码：通过勾选复选框高亮行区域
Sub AddCheckBox()
Dim xCell As Range
Dim xRng As Range
Dim I As Integer
Dim xChk As CheckBox
On Error Resume Next
InputC:
Set xRng = Application.InputBox("Please select the column range to insert checkboxes:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
If xRng.Columns.Count > 1 Then
MsgBox "The selected range should be a single column", vbInformation, "Kutools fro Excel"
GoTo InputC
Else
If xRng.Columns.Count = 1 Then
For Each xCell In xRng
With ActiveSheet.CheckBoxes.Add(xCell.Left, _
xCell.Top, xCell.Width = 15, xCell.Height = 12)
.LinkedCell = xCell.Offset(, 1).Address(External:=False)
.Interior.ColorIndex = xlNone
.Caption = ""
.Name = "Check Box " & xCell.Row
End With
xRng.Rows(xCell.Row).Interior.ColorIndex = xlNone
Next
End If
With xRng
.Rows.RowHeight = 16
End With
xRng.ColumnWidth = 5#
xRng.Cells(1, 1).Offset(0, 1).Select
For Each xChk In ActiveSheet.CheckBoxes
xChk.OnAction = "Sheet2.InsertBgColor"
Next
End If
End Sub
Sub InsertBgColor()
Dim xName As Integer
Dim xChk As CheckBox
For Each xChk In ActiveSheet.CheckBoxes
xName = Right(xChk.Name, Len(xChk.Name) - 10)
If (xName = Range(xChk.LinkedCell).Row) Then
If (Range(xChk.LinkedCell) = "True") Then
Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = 6
Else
Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = xlNone
End If
End If
Next
End Sub
注意：在上述代码中，脚本中的 xChk.OnAction = "Sheet 2.InsertBgColor", 您需将工作表名称 Sheet 2 替换为您自己的工作表名称（Sheet 2 是实际的工作表名称，可从左侧代码窗口窗格中获取）。参见截图：
3. 然后，将光标置于代码的第一部分，按 F5 键运行代码。在弹出的 Kutools for Excel 对话框中，请选择要插入复选框的范围，参见截图：
4. 然后，单击确定按钮，即可在所选单元格中插入复选框，如下方截图所示：
5. 从现在起，只需勾选一个复选框，对应行便会自动着色，如下方截图所示：
示例 5：若复选框被勾选，则统计或求和单元格值如果您有一组包含复选框列表的数据，现在希望统计已勾选复选框的数量，或根据已勾选的复选框对相应值求和（如下方截图所示），该如何在 Excel 中完成此任务？
要完成此任务，关键步骤是将复选框分别链接到数据旁的对应单元格。勾选复选框时，链接单元格将显示 TRUE；否则显示 FALSE。之后，您即可使用计数或求和函数，根据 TRUE 或 FALSE 值获取结果。
1. 首先，您需将复选框分别链接到单元格：勾选时显示 TRUE，未勾选时显示 FALSE，参见截图：
提示：要将复选框链接到单元格，您可以使用控件格式功能逐个链接到单元格，或应用 VBA 代码一次性将所有内容链接到单元格。
2. 然后，应用以下公式，根据已勾选的复选框对数值进行计数或求和：
根据已勾选的复选框计数值：
=COUNTIF(D2:D10,TRUE)
注意：在此公式中，D2:D10 是您为复选框设置的链接单元格范围。
根据已勾选的复选框求和值：
=SUMPRODUCT(($D$2:$D$10=TRUE)*$C$2:$C$10)
注意：在此公式中，D2:D10 是您为复选框设置的链接单元格范围，而 C2:C10 是您要求和的单元格区域。
示例 6：若复选框被勾选，则返回特定值如果您有一个复选框，勾选时应在某个单元格中显示特定值，取消勾选时则显示为空白单元格（如下方演示所示）：
要完成此任务，请按以下步骤操作：
1. 首先，您需要将此复选框链接到一个单元格。右键单击复选框，选择设置控件格式，在弹出的设置对象格式对话框中，切换到控制选项卡，从单元格链接框中选择要与复选框关联的单元格，参见截图：
2. 然后，单击确定按钮关闭对话框。现在，在您要输出结果的单元格中输入公式：=IF(A5=TRUE,"Extendoffice","")，再按 Enter 键即可。
注意：在此公式中，A5 是链接到复选框的单元格，“Extendoffice”为指定文本，您可根据需要随时修改。
3. 现在，勾选复选框时将显示特定文本，取消勾选后单元格则为空白，请参见下方演示：
最佳办公效率工具🤖KUTOOLS AI 助手：基于以下内容革新数据分析：智能执行 | 生成代码| 创建自定义公式 | 数据分析及生成图表| 调用 Kutools Functions……热门功能：查找、高亮或标记重复项 | 删除空白行 | 合并列或单元格且不丢失数据 | 不使用公式的四舍五入…… 高级 LOOKUP：多条件 VLookup | 多值 VLookup | 跨多工作表 VLookup | 模糊查找……高级下拉列表：快速创建下拉列表 | 级联下拉列表 | 多选下拉列表……列管理器：添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……特色功能：网格聚焦 | 设计视图 |增强编辑栏 | 工作簿和表管理器 | 资源库（自动文本）| 日期提取 | 汇总工作表 | 加密/解密单元格 | 按列表发送邮件 | 超级筛选 | 特殊筛选（筛选粗体单元格/斜体/删除线……） ......精选 15 工具集：12 文本工具（添加文本，删除特定字符，……）| 50+ 图表 类型（甘特图，……）| 40+ 实用公式（基于生日计算年龄，……）| 19 插入工具（插入二维码，从路径插入图片，……）| 12 转换工具（小写金额转大写，汇率转换，……）| 7 合并和拆分工具（高级合并行，分割单元格，……）|……更多在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言！使用 Kutools for Excel 大幅提升您的 Excel 技能，体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能，助您提升生产力、节省时间。立即点击此处，获取您最需要的功能……
Kutools for Excel 更多详情……免费下载…… Office Tab 为 Office 带来标签式界面，让您的工作更轻松在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中。将您的工作效率提升 50%，每天减少数百次鼠标点击！ Office Tab 更多详情……免费下载…… 所有 Kutools 插件，一个安装程序Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro，非常适合需要跨多个 Office 应用高效协作的团队。
一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro一个安装程序，一个许可证— 几分钟内完成设置（支持 MSI）协同效果更佳— 在多个 Office 应用中实现高效协同30 天全功能试用— 无需注册，无需信用卡超值之选— 比单独购买插件更省钱 Kutools for Office 更多详情……免费下载……