如何在Excel中双击在单元格中添加复选标记？

通常，要在单元格中插入复选标记，您需要进入“符号”对话框，找到复选标记符号并手动将其插入。 但是在“符号”对话框中查找复选标记符号并不容易，因为其中列出了许多符号。 如何在Excel的单元格中快速添加复选标记？ 本文将向您展示一种VBA方法，只需双击即可轻松在单元格中添加复选标记。

双击以在带有VBA代码的单元格中添加复选标记

双击以在带有VBA代码的单元格中添加复选标记

下面的VBA代码可以帮助您双击单元格中添加复选标记。 请执行以下操作。

1.打开您需要在单元格中添加复选标记的工作表，然后右键单击并选择 查看代码 从右键单击菜单中。

2.在 Microsoft Visual Basic应用程序 窗口，将下面的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。 按 其他 + Q 关闭键 Microsoft Visual Basic应用程序 窗口并返回到工作表。

现在，双击范围B1：B10中的任何单元格，复选标记将自动输入。 再次双击该单元格，将删除插入的复选标记。

相关文章:

• 如何双击单元格并在Excel中将该单元格值添加1？
• 如何在Excel中双击自动在单元格中添加/输入当前日期/时间？