如何在 Excel 中将 true false 转换为复选框？

假设您在两列中列出了数字，如果第一列中的数字大于第二列中的数字，则显示 TRUE，否则显示 FALSE，如下截图所示。现在，您可以更改公式以轻松地在 Excel 中将 TRUE 或 FALSE 转换为复选框标记。

将原始公式更改为 =IF(原始公式,"þ","¨")

1. 在这种情况下，我使用公式 =B3>C3 来比较两列中的数字。因此，我将把原始公式更改为如下所示，然后拖动自动填充句柄到其他单元格。

=IF(B3>C3,"þ","¨")

2. 保持公式单元格选中状态，右键单击，并从上下文菜单中选择 设置单元格格式。

3. 在 设置单元格格式 对话框中，转到 字体 选项卡，从 字体 列表框中选择 Windings，然后点击 确定 按钮。

现在，您会看到特殊字符被转换为已勾选的复选框和未勾选的复选框。请参见截图：

本节将介绍一个 VBA 宏，用于在 Excel 中将多个 true 和 false 转换为复选框控件。请按照以下步骤操作：

1. 选择等于“TRUE”和“FALSE”的单元格，这些单元格将被转换为复选框。

2. 同时按下 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

3. 单击 插入 > 模块，然后将以下 VBA 代码粘贴到新的模块窗口中。

VBA：在 Excel 中将 TRUE 和 FALSE 转换为复选框控件

Sub ConvertTrueFalseToCheckbox()
Dim xCB As CheckBox
Dim xRg, xCell As Range
Application.ScreenUpdating = False
On Error Resume Next
Set xRg = Selection
For Each xCB In ActiveSheet.CheckBoxes
xCB.Delete
Next
For Each xCell In xRg
If (UCase(xCell.Value) = "TRUE") Or (UCase(xCell.Value) = "FALSE") Then
Set xCB = ActiveSheet.CheckBoxes.Add(xCell.Left, xCell.Top, cDblCheckboxWidth, xCell.Height)
xCB.Value = xCell.Value
xCB.LinkedCell = xCell.Address
xCB.Text = ""
End If
Next
Application.ScreenUpdating = True
End Sub

4. 按下 F5 键或单击 运行 按钮运行此 VBA。

然后，您会看到所有选定的 TRUE 和 FALSE 都被转换为复选框控件。TRUE 被转换为已勾选的复选框，FALSE 被转换为未勾选的复选框。请参见截图：

如果您安装了 Kutools for Excel，您可以应用其 批量插入复选框 功能，通过一次点击在 Excel 中批量插入多个复选框控件。

Kutools for Excel - 包含超过 300 种实用工具，适用于 Excel。全功能免费试用 60 天，无需信用卡！ 立即获取

1. 选择等于“TRUE”和“FALSE”的单元格，这些单元格将被转换为复选框，然后单击 Kutools > 插入 > 批量插入复选框。

2. 现在，每个选定的单元格中都会插入一个复选框控件。您可以根据需要手动勾选这些复选框。