如何在Excel中通過雙擊在單元格中添加核取方塊？

通常，要在單元格中插入核取方塊，您需要進入「符號」對話框，找到核取方塊符號並手動插入。然而，在「符號」對話框中找到核取方塊符號並不容易，因為裡面列出了大量的符號。如何快速在Excel的單元格中添加核取方塊呢？本文將向您展示一種VBA方法，只需雙擊即可輕鬆在單元格中添加核取方塊。

使用VBA代碼雙擊以在單元格中添加核取方塊

使用VBA代碼雙擊以在單元格中添加核取方塊

以下VBA代碼可以幫助您通過雙擊在單元格中添加核取方塊。請按照以下步驟操作。

1. 打開需要在單元格中添加核取方塊的工作表，然後右鍵單擊並從右鍵菜單中選擇檢視程式碼。

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

VBA代碼：雙擊以在單元格中添加核取方塊

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
        Application.EnableEvents = False
        If ActiveCell.Value = ChrW(&H2713) Then
            ActiveCell.ClearContents
        Else
            ActiveCell.Value = ChrW(&H2713)
        End If
        Cancel = True
    End If
    Application.EnableEvents = True
End Sub

備註：在代碼中，B1:B10是您要通過雙擊添加核取方塊的區域。請根據您的需求進行更改。

3. 按下Alt + Q鍵關閉Microsoft Visual Basic for Applications窗口並返回工作表。

現在，雙擊範圍B1:B10中的任何單元格，核取方塊將自動輸入。再次雙擊該單元格，插入的核取方塊將被刪除。

使用 Kutools AI 解鎖 Excel 的魔法

• 智能執行：執行單元格操作、分析數據並創建圖表——所有這些都由簡單的指令驅動。
• 自訂公式：生成量身定制的公式，簡化您的工作流程。
• VBA 編碼：輕鬆編寫和實現 VBA 代碼。
• 公式解釋：輕鬆理解複雜的公式。
• 文本翻譯：打破電子表格中的語言障礙。

通過人工智能工具增強您的 Excel 能力。立即下載，體驗前所未有的效率！

相關文章：

• 如何在Excel中雙擊單元格並在該單元格值上加1？
• 如何在Excel中通過雙擊單元格自動添加/輸入當前日期/時間？