如何在 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. 現在每個選定的單元格中都插入了一個核取方塊控制項。您可以根據需要手動勾選這些核取方塊。