Как добавить галочку в ячейку двойным щелчком в 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, галочка будет вставлена автоматически. Если снова дважды щелкнуть эту ячейку, вставленная галочка будет удалена.

Раскройте магию Excel с Kutools AI

• Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
• Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
• Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
• Интерпретация формул: Легко разбирайтесь в сложных формулах.
• Перевод текста: Преодолейте языковые барьеры в ваших таблицах.

Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!

Связанные статьи:

• Как увеличить значение ячейки на 1 при двойном щелчке в Excel?
• Как автоматически добавлять/вводить текущую дату/время в ячейку двойным щелчком в Excel?