如何根據 Excel 中的單元格值自動勾選核取方塊？

您可能知道如何根據核取方框改變單元格的值。但是，您知道如何在 Excel 中根據單元格的值讓核取方塊自動被勾選嗎？本文將向您展示實現這一功能的方法。

使用公式根據單元格值自動勾選核取方塊
使用 VBA 程式碼根據單元格值自動勾選核取方塊

使用公式根據單元格值自動勾選核取方塊

假設當單元格 A1 的值等於「Test」時，您希望核取方塊 1 自動被勾選。請按照以下步驟操作。

1. 插入核取方塊（表單控制項）後，選擇它並通過在編輯欄中輸入 =C2 將其連結到指定的單元格 C2。

對於 ActiveX 控制項核取方塊，請右鍵點擊它並從右鍵菜單中選擇「屬性」。在屬性對話框中，將連結的單元格輸入到LinkedCell欄位中，然後關閉對話框。請參閱截圖：

2. 選擇已連結的單元格（C2），然後在編輯欄中輸入公式 =IF(A2="Test",TRUE,FALSE)，然後按下 Enter 鍵。

備註：在公式中，A2 和 Test 是需要讓核取方塊自動勾選所基於的單元格和單元格值。

3. 當在單元格 A1 中輸入值「Test」時，相應的核取方塊將自動被勾選。請參閱截圖：

備註：此公式不區分大小寫。

使用 VBA 程式碼根據單元格值自動勾選核取方塊

您可以運行以下 VBA 程式碼來根據 Excel 中的單元格值自動勾選核取方塊。

1. 右鍵點擊基於單元格值自動勾選核取方塊的工作表標籤，然後從右鍵菜單中選擇「檢視程式碼」。

2. 在 Microsoft Visual Basic for Applications 視窗中，請將以下 VBA 程式碼複製並粘貼到程式碼窗口中。

VBA 程式碼：根據單元格值自動勾選核取方塊

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A2").Value = "Test" Then
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn
    Else
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOff
    End If
End Sub

備註：在程式碼中，A2 和 Test 是需要讓核取方塊自動勾選所基於的單元格和單元格值。核取方塊 1 是核取方塊的名稱。

3. 按下 Alt + Q 鍵以關閉 Microsoft Visual Basic for Applications 視窗。

當在單元格 A2 中輸入值「Test」時，指定的核取方塊將自動被勾選。

備註：此程式碼區分大小寫。

提示：如果您想一次性在選定範圍內插入多個核取方塊，可以嘗試 Kutools for Excel 的批量插入核取方塊工具，或使用批量插入選項按鈕工具批量插入多個選項按鈕。此外，您還可以使用批量刪除核取方塊工具一次性刪除所有核取方塊，如下方截圖所示。您可以前往下載 Kutools for Excel！(30-天免費試用)。

相關文章：

• 如何在 Excel 中核取方塊被勾選時更改指定單元格的值或顏色？
• 如何在 Excel 中使用核取方塊高亮顯示單元格或整行？
• 如何在 Excel 中勾選核取方塊時在單元格中插入日期戳？
• 如何在 Excel 中根據核取方塊篩選數據？
• 如何在 Excel 中隱藏行時隱藏核取方塊？
• 如何在 Excel 中創建帶有多個核取方塊的下拉列表？