Как выбрать все флажки с помощью одного флажка в Excel?

Флажки очень полезны для пользователей Excel. С помощью списка флажков мы можем выбрать несколько опций на листе. Если нужно выбрать множество флажков одновременно, то выбор их по одному может быть утомительным и отнимать много времени. Здесь я могу показать вам, как выбрать все флажки с помощью одного флажка, то есть, когда вы отметите этот главный флажок, все флажки текущего листа будут выбраны мгновенно.

Выбор всех флажков с помощью одного флажка с использованием кода VBA

Выбор всех флажков с помощью одного флажка с использованием кода VBA

Чтобы выбрать все флажки рабочего листа с помощью одного главного флажка, выполните следующие шаги:

1. Сначала вы можете добавить флажок и назвать его Выбрать все. Это будет ваш главный флажок, см. скриншот:

2. Затем нажмите клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

3. Нажмите Вставить > Модуль и вставьте следующий код в окно Модуля.

Код VBA: выбор всех флажков с помощью одного флажка

Sub SelectAll_Click()
'Update by Extendoffice
Dim xCheckBox As CheckBox
For Each xCheckBox In Application.ActiveSheet.CheckBoxes
    If xCheckBox.Name <> Application.ActiveSheet.CheckBoxes("Check Box 1").Name Then
        xCheckBox.Value = Application.ActiveSheet.CheckBoxes("Check Box 1").Value
    End If
Next
End Sub

4. Затем сохраните и закройте этот код, вернитесь к рабочему листу, щелкните правой кнопкой мыши флажок Выбрать все и выберите Назначить макрос из контекстного меню, см. скриншот:

5. В диалоговом окне Назначить макрос нажмите на опцию SelectAll_Click в списке Имя макроса, затем нажмите кнопку ОК, чтобы закрыть это диалоговое окно, см. скриншот:

6. Теперь, когда вы отметите главный флажок Выбрать все, все остальные флажки текущего листа будут отмечены сразу.

Примечание: В приведенном выше коде Check Box 1 — это имя вашего главного флажка, вы можете просмотреть его в поле имени, щелкнув по нему правой кнопкой мыши, и изменить его при необходимости.

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

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

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

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

Как связать флажок с несколькими ячейками в Excel?

Как быстро вставить несколько флажков в Excel?

Как быстро удалить несколько флажков в Excel?