Флажки в Excel: добавление, выбор, удаление и использование флажков в Excel

Флажок — это интерактивный инструмент для выбора или отмены выбора опции. Часто они встречаются в веб-формах или при заполнении анкет. В Excel флажки открывают множество возможностей: благодаря их установке или снятию ваш лист становится более динамичным и интерактивным. Например, вы можете создавать контрольные списки, вставлять динамические диаграммы и многое другое.

В этом руководстве я покажу, как вставлять, выбирать и удалять флажки в Excel, а также приведу примеры их практического применения.

Два типа флажков (Флажок элемент управления формы и Флажок элемент управления ActiveX)

Чтобы вставить флажок, убедитесь, что вкладка «Разработчик» отображается на ленте. По умолчанию она скрыта, поэтому сначала её нужно активировать.

1. В рабочей книге Excel нажмите Файл > Параметры. В диалоговом окне Параметры Excel щёлкните Настроить ленту, затем установите флажок напротив пункта Разработчик и нажмите кнопку OK, чтобы закрыть это диалоговое окно.

2. Теперь вкладка Разработчик отображается на ленте Excel, как показано на снимке экрана ниже. С этой вкладки вы можете при необходимости получить доступ к различным интерактивным элементам управления.

Microsoft Excel предоставляет два типа флажков:Флажок элемент управления формыи Флажок элемент управления ActiveX:

Элемент управления формы Флажок значительно проще, чем элемент управления ActiveX Флажок, а элемент управления ActiveX Флажок обладает большей гибкостью в оформлении и может использоваться в кодах как объект. Для повседневной работы достаточно элементов управления формы, поэтому в большинстве случаев мы будем использовать именно их.

Элемент управления формы Флажок и элемент управления ActiveX Флажок:

• Элементы управления ActiveX предоставляют больше возможностей форматирования и подходят для сложного и гибкого дизайна;
• Элементы управления формы встроены в Excel, тогда как элементы управления ActiveX загружаются отдельно и иногда могут зависать;
• Некоторые компьютеры по умолчанию не доверяют элементам управления ActiveX, поэтому их необходимо включить вручную через Центр управления безопасностью;
• Флажок Элемент управления ActiveX можно программно вызывать через редактор VBA;
• ActiveX доступен исключительно в версии для Windows и не поддерживается на Mac OS.

Примечание: Все флажки, упомянутые в следующих руководствах, представляют собой флажки — элементы управления формы.

Добавление одного или нескольких флажков в Excel

Этот раздел поможет вам вставить один или несколько флажков.

2,1 Вставка одного флажка

Чтобы вставить флажок, выполните следующие действия:

1. Перейдите на вкладку Разработчик, затем в группе Элементы управления нажмите Вставить и выберите Флажок в разделе Элементы управления формы. После этого щёлкните ячейку, в которую нужно вставить флажок — он появится рядом с ней (см. снимки экрана):

2. Затем наведите курсор на границу рамки выделения вашего флажка. Как только курсор превратится в указатель перемещения, щёлкните и перетащите флажок в нужную ячейку (см. снимки экрана):

2,2 Вставка нескольких флажков

Если вам нужно разместить на листе несколько флажков, в этом разделе описаны удобные и быстрые способы их добавления.

Вставка нескольких флажков с помощью маркера заполнения

Чтобы быстро вставить несколько флажков, сначала добавьте один флажок, как описано выше, а затем воспользуйтесь маркером заполнения, чтобы скопировать его в другие ячейки.

1. Щёлкните, чтобы выбрать ячейку с флажком.

2. Перетащите маркер заполнения вниз, чтобы заполнить ячейки флажками, как показано на снимке экрана ниже:

Вставка нескольких флажков с помощью кода VBA

Следующий код VBA поможет вам быстро и легко вставить список флажков. Выполните следующие действия:

1. Нажмите и удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

2. Затем нажмите Вставка > Модуль и вставьте приведённый ниже код в окно Модуль.

Код VBA: Вставка нескольких флажков в список ячеек

Sub InsertCheckBoxes()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Ws As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Ws = Application.ActiveSheet
Application.ScreenUpdating = False
For Each Rng In WorkRng
    With Ws.CheckBoxes.Add(Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        .Characters.Text = Rng.Value
    End With
Next
WorkRng.ClearContents
WorkRng.Select
Application.ScreenUpdating = True
End Sub

3. Нажмите клавишу F5, чтобы запустить этот код. После этого появится диалоговое окно с запросом на выбор диапазона ячеек для вставки флажков. См. снимок экрана:

4. Затем нажмите кнопку OK — и флажки мгновенно аккуратно вставятся в ячейки. См. снимок экрана:

Вставка нескольких флажков с помощью удобной функции

Если у вас установлен Kutools для Excel, воспользуйтесь функцией Пакетная вставка флажка, чтобы мгновенно добавить флажки в пустые ячейки или ячейки с данными.

1. Выделите диапазон ячеек, куда нужно вставить флажки.

2. Затем нажмите Kutools > Вставить > Пакетная вставка флажков, см. снимок экрана:

3. После этого выбранные ячейки заполнятся флажками, как показано на снимках экрана ниже:

Вставка флажков в пустые ячейки	Вставка флажков в ячейки с данными

Изменение имени флажка и текста подписи

При работе с флажками в Excel важно различать имя флажка и имя его подписи. Имя подписи — это текст, отображаемый рядом с флажком, а имя флажка — то, что появляется в поле имени при его выделении, как показано на приведённых ниже снимках экрана:

Имя флажка	Текст подписи

Чтобы изменить имя подписи, щёлкните правой кнопкой мыши по флажку, выберите в контекстном меню пункт Изменить текст и введите желаемое новое имя (см. снимки экрана):

Чтобы изменить имя флажка, выделите флажок и введите нужное имя в поле имени, как показано на приведённом ниже снимке экрана:

Привязка одного или нескольких флажков к ячейкам

При работе с флажками их часто необходимо привязать к ячейкам: если флажок установлен — в ячейке отображается ИСТИНА (TRUE), если снят — ЛОЖЬ (FALSE) или пустое значение. В этом разделе рассказывается, как привязать один или несколько флажков к ячейкам в Excel.

4,1 Привязка одного флажка к ячейке с помощью функции «Формат элемента управления»

Чтобы связать флажок с определённой ячейкой, выполните следующие действия:

1. Щёлкните правой кнопкой мыши по флажку и выберите в контекстном меню пункт Формат элемента управления (см. снимок экрана):

2. В диалоговом окне Формат объекта на вкладке Элемент управления щёлкните, чтобы выбрать ячейку, к которой необходимо привязать флажок, в поле Связь с ячейкой, или введите ссылку на ячейку вручную (см. снимок экрана):

3. Нажмите кнопку OK, чтобы закрыть диалоговое окно. Теперь флажок привязан к определённой ячейке: при его установке в ячейке отображается значение ИСТИНА, а при снятии — ЛОЖЬ, как показано в примере ниже:

4,2 Привязка нескольких флажков к ячейкам с помощью кода VBA

Чтобы привязать несколько флажков к ячейкам с помощью функции «Формат элемента управления», придётся многократно повторять описанные выше действия — а это крайне затратно по времени, особенно если речь идёт о сотнях или даже тысячах флажков. В такой ситуации гораздо эффективнее воспользоваться кодом VBA, который позволяет привязать сразу множество флажков к нужным ячейкам.

1. Перейдите на лист, содержащий флажки.

2. Удерживая клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.

3. Затем нажмите Вставка > Модуль и вставьте приведённый ниже код в окно Модуль.

Код VBA: Одновременная привязка нескольких флажков к ячейкам

Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "C"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
    Cells(i, xCChar).Value = True
Else
    Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub

Примечание: В этом коде i = 2 — число 2 указывает начальную строку для ваших флажков, а xCChar = «C» — буква C обозначает столбец, к которому вы хотите привязать флажки. Вы можете изменить эти значения по своему усмотрению.

4. Нажмите F5, чтобы запустить этот код. Все флажки на активном листе будут одновременно привязаны к указанным ячейкам: при установке флажка в связанной ячейке появится значение ИСТИНА, а при снятии — ЛОЖЬ. См. снимок экрана:

Выберите один или несколько флажков

Чтобы скопировать или удалить флажки на листе, сначала выделите их. Для выбора одного или нескольких флажков выполните следующие действия:

Выбор одного флажка (два способа)

• Щёлкните правой кнопкой мыши по флажку, а затем — в любом месте внутри него.
• ИЛИ
• Нажмите клавишу Ctrl и щёлкните по флажку.

Выбор нескольких флажков:

Удерживайте клавишу Ctrl и последовательно щелкайте по флажкам, которые нужно выделить.

Удаление одного или нескольких флажков

Удалить один флажок легко — достаточно выделить его и нажать клавишу Delete на клавиатуре. Но как удалить сразу несколько флажков в Excel?

6,1 Удаление нескольких флажков с помощью кода VBA

Чтобы удалить все флажки на листе, воспользуйтесь приведённым ниже кодом VBA.

1. Удерживая клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.

2. Затем выберите Вставка > Модуль и вставьте следующий код в окно Модуль.

Код VBA: Удалить все флажки в Текущий лист

Sub RemoveCheckboxes()
'Update by Extendoffice
On Error Resume Next
ActiveSheet.CheckBoxes.Delete
Selection.FormatConditions.Delete
End Sub

3. Затем нажмите клавишу F5, чтобы выполнить код. Все флажки на указанном листе будут удалены одновременно.

6,2 Удаление нескольких флажков с помощью простой функции

С помощью функции Kutools для Excel — Пакетное удаление флажков — вы можете удалить флажки из выбранного диапазона или со всего листа всего за несколько щелчков.

1. Выделите диапазон ячеек или весь лист, содержащий флажки, которые нужно удалить.

2. Затем последовательно выберите команды: Kutools > Удалить > Пакетное удаление флажков. См. снимок экрана:

3. После этого все флажки будут немедленно удалены из выделенного диапазона.

Группировка флажков в Excel

Если вы хотите одновременно перемещать или изменять размер нескольких флажков, их группировка позволит управлять всеми ими как единым целым. В этом разделе объясняется, как объединить несколько флажков в группу на листе Excel.

7,1 Группировка флажков с использованием функции «Группа»

В Excel функция Группа позволяет объединять несколько флажков в одну группу. Выполните следующие действия:

1. Удерживая клавишу Ctrl, последовательно щелкайте по флажкам, которые нужно сгруппировать. См. снимок экрана:

2. Затем щелкните правой кнопкой мыши и в контекстном меню выберите команды: Группа > Группа. См. снимок экрана:

3. После объединения выбранных флажков в группу вы сможете одновременно перемещать или копировать их.

7,2 Группировка флажков с использованием элемента управления «Поле группы»

Кроме того, для группировки нескольких флажков можно использовать элемент управления Поле группы. Выполните следующие шаги:

1. Перейдите на вкладку Разработчик и последовательно выберите команды: Вставить > Поле группы (элемент управления формы), см. снимок экрана:

2. Затем перетащите указатель мыши, чтобы нарисовать поле группы, и при необходимости измените заголовок поля:

3. Теперь вы можете вставить флажки внутрь поля группы. Для этого перейдите на вкладку Разработчик → Вставить → Флажок (элемент управления формы), см. снимок экрана:

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

5. Аналогичным образом добавьте остальные флажки в группу. Результат показан на снимке экрана ниже:

Примеры: Как использовать флажки в Excel

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

Пример 1: Создание списка задач с флажками

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

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

1. Вставьте флажки в ячейки списка, где они должны находиться. См. снимок экрана: ()Щелкните, чтобы узнать, как вставить несколько флажков)

2. После вставки флажков привяжите каждый из них к отдельной ячейке.

3. После привязки флажков к ячейкам при установке флажка в ячейке появится значение ИСТИНА, а при снятии — ЛОЖЬ. См. снимок экрана:

4. Далее воспользуйтесь функцией Использовать условное форматирование. Выделите диапазон ячеек A2:C8, в котором требуется создать список задач, и последовательно выберите команды: Главная > Использовать условное форматирование > Создать правило, чтобы открыть диалоговое окно Создание нового правила форматирования.

5. В диалоговом окне Создание нового правила форматирования в списке Выберите тип правила выберите пункт Использовать формулу для определения форматируемых ячеек, а затем введите формулу =C2=ИСТИНА в поле Форматировать значения, для которых данная формула возвращает значение ИСТИНА. См. снимок экрана:

Примечание: C2 — это ячейка, привязанная к флажку.

6. Затем нажмите кнопку Формат, чтобы открыть диалоговое окно Установить формат ячейки. На вкладке Шрифт установите флажок Зачеркнутый в разделе Эффекты и выберите нужный цвет для выполненного элемента списка задач, как показано на снимке экрана:

7. Затем нажмите кнопку ОК > ОК, чтобы закрыть диалоговые окна. Теперь при выборе флажка соответствующий элемент будет отображаться зачёркнутым, как показано на демонстрации ниже:

Пример 2: создание динамической диаграммы с помощью флажков

Иногда может потребоваться отобразить большое количество данных и информации на одной диаграмме, из-за чего она станет перегруженной. В таком случае можно использовать флажки для создания динамической диаграммы на листе. При установке флажка соответствующая линия данных будет отображаться; если флажок снят, линия данных скроется, как показано на демонстрации ниже.

В этом разделе представлены два быстрых способа создания такой диаграммы в Excel.

Создание интерактивной диаграммы с флажками в Excel

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

1. Вставьте несколько флажков и переименуйте их. В этом примере я добавил три флажка и назвал их «Яблоко», «Апельсин» и «Персик», как показано на снимке экрана:

2. Затем привяжите эти флажки к ячейкам. Щелкните правой кнопкой мыши по первому флажку и выберите команду Формат элемента управления. В диалоговом окне Формат объекта на вкладке Элемент управления в поле Связь с ячейкой укажите ячейку, к которой нужно привязать флажок, как показано на снимке экрана:

3. Повторите описанный выше шаг, чтобы привязать остальные два флажка к разным ячейкам. Теперь при установке флажка в соответствующей ячейке появится значение ИСТИНА, а при снятии — ЛОЖЬ, как показано на демонстрации ниже:

4. После вставки и привязки флажков подготовьте данные: скопируйте исходные заголовки строк и столбцов в другое место, как показано на снимке экрана.

5. Затем используйте приведённые ниже формулы:

• В ячейке B13:=IF($B$6,B2,NA())и перетащите маркер заполнения, чтобы заполнить строку от B13 до G13;
• В ячейке B14:=IF($B$7,B3,NA())и перетащите маркер заполнения, чтобы заполнить строку от B14 до G14;
• В ячейке B15: =IF($B$8,B4,NA()) — и перетащите маркер заполнения, чтобы заполнить диапазон от B15 до G15.
• Эти формулы возвращают значение из исходных данных, если флажок для этого продукта установлен, и #Н/Д — если снят. См. снимок экрана:

6. Затем выделите новый диапазон данных — от A12 до G15 — и нажмите Вставка > Диаграммы → График или площадь > График, чтобы вставить линейную диаграмму.

7. Теперь, когда вы устанавливаете флажок напротив продукта, его линия данных появляется на диаграмме, а при снятии — исчезает, как показано на демонстрации ниже:

8. После создания диаграммы вы можете разместить флажки прямо на ней для аккуратного вида. Щёлкните по области диаграммы и перетащите её границы, чтобы уменьшить размер, как показано на снимке экрана:

9. Удерживая клавишу Ctrl, выделите три флажка и перетащите их на диаграмму. Затем щелкните правой кнопкой мыши и выберите команду Поместить на передний план > Поместить на передний план, как показано на снимке экрана:

10. Теперь флажки отображаются на диаграмме. Удерживая клавишу Ctrl, последовательно выделите флажки и диаграмму, щелкните правой кнопкой мыши и выберите команду Группировать > Группировать, как показано на снимке экрана:

11. Теперь флажки привязаны к линейной диаграмме — они будут перемещаться вместе с ней при её переносе.

Создание интерактивной диаграммы с флажками с помощью простой функции

Описанный выше метод может показаться сложным. Ниже — более простой способ решения этой задачи: с помощью функции Kutools для Excel «Диаграмма с флажками» вы легко создадите динамическую диаграмму с флажками.

1. Выделите диапазон данных, на основе которого нужно создать диаграмму, и нажмите Kutools > Диаграммы > Сравнение категорий > Диаграмма с флажками, как показано на снимке экрана:

2. Откроется диалоговое окно Диаграмма с флажками, в которое данные автоматически загрузятся в отдельные поля. См. снимок экрана:

3. Нажмите кнопку ОК. Появится предупреждение о том, что будет создан скрытый лист с промежуточными данными. Нажмите кнопку Да, как показано на снимке экрана:

4. Линейная диаграмма с флажками будет успешно создана — см. снимок экрана:

Пример 3: создание Раскрывающийся список с флажками

Выбор нескольких элементов из раскрывающегося списка — распространённая задача для многих пользователей. Некоторые пытаются создать раскрывающийся список с флажками для множественного выбора, как показано в демонстрации ниже. К сожалению, Excel не поддерживает создание раскрывающегося списка с флажками «из коробки». Однако здесь представлены два способа реализации множественного выбора с флажками в Excel: один — с использованием поля со списком и флажков, другой — раскрывающийся список с флажками.

Создание Раскрывающийся список с флажками с помощью поля со списком

Вместо раскрывающегося списка можно использовать поле со списком для добавления флажков множественного выбора. Процесс немного сложен, поэтому следуйте приведённым ниже шагам:

1. Сначала вставьте поле со списком: перейдите на вкладку Разработчик, нажмите Вставить, а затем выберите Поле со списком (элемент управления ActiveX). См. снимок экрана:

2. Перетащите курсор, чтобы нарисовать поле со списком, затем щелкните по нему правой кнопкой мыши и выберите команду Свойства из контекстного меню (см. снимок экрана):

3. В области Свойства выполните следующие настройки:

• В поле ListFillRangeвведите Диапазон данных, которые вы хотите отобразить в поле со списком;
• В поле ListStyleвыберите значение 1 – fmListStyleOptionиз раскрывающегося списка;
• В поле MultiSelectвыберите 1 – fmMultiSelectMultiиз раскрывающегося списка;
• Наконец, нажмите кнопку закрытия, чтобы завершить работу с окном.

4. Затем щелкните ячейку, в которую нужно вывести выбранные элементы «Количество выбранных элементов», и задайте для неё имя. Введите имя ячейки «Outputitem» в поле имени и нажмите клавишу Enter. См. снимок экрана:

5. Затем нажмите Вставка > Фигуры > Прямоугольник и перетащите курсор, чтобы нарисовать прямоугольник поверх поля со списком. См. снимок экрана:

6. Щелкните прямоугольник правой кнопкой мыши и выберите команду Назначить макрос из контекстного меню. См. снимок экрана:

7. В диалоговом окне Назначить макрос нажмите кнопку Создать, см. снимок экрана:

8.В открывшемся окне Microsoft Visual Basic для приложенийзамените исходный код в окне модуля приведенным ниже кодом VBA:

Sub Rectangle1_Click()
'Updated by Extendoffice
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("Outputitem").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("Outputitem") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("Outputitem") = ""
    End If
End If
End Sub

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

9. Закройте окно кода. Теперь при нажатии на прямоугольную кнопку поле со списком будет скрываться или отображаться. Когда список виден, выберите нужные элементы и снова нажмите ту же кнопку, чтобы вывести количество выбранных элементов в указанную ячейку — см. демонстрацию ниже:

Создайте Раскрывающийся список с флажками с помощью потрясающей функции

Вы можете использовать мощный инструмент Kutools для Excel, чтобы легко добавить флажки в настоящий раскрывающийся список. Благодаря функции «Добавить флажки в выпадающий список» Kutools позволяет быстро создавать раскрывающиеся меню с поддержкой множественного выбора — возможности, отсутствующей в стандартном Excel. Это не только расширяет функциональность ваших списков, но и значительно повышает эффективность работы и удобство использования.

1. Сначала вставьте обычный раскрывающийся список в выбранные ячейки (см. снимок экрана):

2. Нажмите «Kutools» > Раскрывающийся список > Включить расширенный раскрывающийся список. Затем снова выберите команду «Добавить флажки в выпадающий список» в разделе «Раскрывающийся список». См. снимок экрана:

3. В диалоговом окне «Добавить флажки в раскрывающийся список» выполните следующие настройки:

• 2,1) Выделите ячейки, содержащие раскрывающийся список;
• 2,2) В поле «Разделитель» введите разделитель, который будет использоваться для отделения нескольких элементов;
• 2,4) Нажмите кнопку «ОК».
  

Теперь при щелчке по ячейке с раскрывающимся списком отобразится список с флажками. Отметьте нужные элементы, установив соответствующие флажки, чтобы добавить их в ячейку, как показано в демонстрации ниже:

Советы: Если вы отметите параметр Включить функцию поиска в диалоговом окне, вы сможете выполнять поиск в раскрывающемся списке, как показано на следующем снимке экрана:

Пример 4: Изменение цвета строки при установке флажка

Пробовали ли вы когда-нибудь менять цвет строки в зависимости от состояния флажка? То есть при установке флажка цвет соответствующей строки должен автоматически изменяться, как показано на снимке экрана ниже. В этом разделе рассматриваются несколько эффективных способов решения этой задачи в Excel.

Изменение цвета ячейки при установке флажка с помощью Использовать условное форматирование

Чтобы изменить цвет строки при установке или снятии флажка, воспользуйтесь функцией Использовать условное форматирование в Excel. Выполните следующие действия:

1. Сначала вставьте флажки в нужные ячейки списка, как показано на снимке экрана:

2. Затем свяжите каждый флажок с ячейкой, расположенной рядом с ним — отдельно для каждого флажка (см. снимок экрана):

3. Выделите диапазон данных, для которого нужно изменить цвет строки, и нажмите Главная > Использовать условное форматирование > Создать правило, см. снимок экрана:

4. В диалоговом окне «Создание правила форматирования» выполните следующие действия:

• Выберите параметр Использовать формулу для определения форматируемых ячеекв поле Выбор типа правила;
• Введите эту формулу =IF($F2=TRUE,TRUE,FALSE)в поле Форматировать значения, для которых данное условие является истинным;
• Нажмите кнопку Формат, чтобы выбрать понравившийся цвет строк.

Примечание: В формуле $F2 — это первая связанная ячейка флажка.

5. После выбора цвета нажмите ОК > ОК, чтобы закрыть диалоговые окна. Теперь при установке флажка соответствующая строка будет автоматически выделяться цветом, как показано в демонстрации ниже:

Установка флажка для изменения цвета строки с помощью кода VBA

Следующий код VBA поможет вам изменять цвет строки в зависимости от состояния флажка. Воспользуйтесь приведённым ниже кодом:

1. На листе, где вы хотите выделить диапазон строк с помощью флажков, щёлкните правой кнопкой мыши по ярлыку листа и выберите в контекстном меню пункт Просмотреть код. См. снимок экрана:

2. Скопируйте и вставьте приведённый ниже код в открывшееся окно Microsoft Visual Basic для приложений:

Код VBA: Выделенный диапазон строк при установке флажка

Sub AddCheckBox()
Dim xCell As Range
Dim xRng As Range
Dim I As Integer
Dim xChk As CheckBox
On Error Resume Next
InputC:
    Set xRng = Application.InputBox("Please select the column range to insert checkboxes:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
If xRng.Columns.Count > 1 Then
    MsgBox "The selected range should be a single column", vbInformation, "Kutools fro Excel"
    GoTo InputC
Else
    If xRng.Columns.Count = 1 Then
        For Each xCell In xRng
            With ActiveSheet.CheckBoxes.Add(xCell.Left, _
               xCell.Top, xCell.Width = 15, xCell.Height = 12)
               .LinkedCell = xCell.Offset(, 1).Address(External:=False)
               .Interior.ColorIndex = xlNone
               .Caption = ""
               .Name = "Check Box " & xCell.Row
            End With
            xRng.Rows(xCell.Row).Interior.ColorIndex = xlNone
        Next
    End If
    With xRng
     .Rows.RowHeight = 16
    End With
    xRng.ColumnWidth = 5#
    xRng.Cells(1, 1).Offset(0, 1).Select
    For Each xChk In ActiveSheet.CheckBoxes
      xChk.OnAction = "Sheet2.InsertBgColor"
    Next
End If
End Sub

Sub InsertBgColor()
Dim xName As Integer
Dim xChk As CheckBox
For Each xChk In ActiveSheet.CheckBoxes
  xName = Right(xChk.Name, Len(xChk.Name) - 10)
  If (xName = Range(xChk.LinkedCell).Row) Then
   If (Range(xChk.LinkedCell) = "True") Then
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = 6
   Else
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = xlNone
   End If
  End If
Next
End Sub

Примечание: В приведённом выше коде в строке xChk.OnAction = "Sheet2.InsertBgColor" замените имя листа — Sheet2— на своё собственное ()Sheet2 — это фактическое имя рабочего листа; его можно увидеть на левой панели окна кода). См. снимок экрана:

3. Поместите курсор в первую часть кода и нажмите клавишу F5, чтобы запустить его. В появившемся диалоговом окне Kutools для Excel укажите диапазон, в который нужно вставить флажки (см. снимок экрана):

4. Затем нажмите кнопку ОК, и флажки появятся в выбранных ячейках, как показано на снимке экрана ниже:

5. Теперь при установке флажка соответствующая строка будет автоматически выделяться цветом, как показано на снимке экрана ниже:

Пример 5: Подсчёт или суммирование значений ячеек при установленных флажках

Если у вас есть диапазон данных со списком флажков и вы хотите подсчитать количество установленных флажков или просуммировать соответствующие значения на их основе, как показано на снимке экрана ниже, — как выполнить эту задачу в Excel?

Чтобы решить эту задачу, важно привязать флажки к соответствующим ячейкам рядом с данными: установленный флажок запишет в связанную ячейку значение ИСТИНА, а снятый — значение ЛОЖЬ. После этого вы сможете использовать функции подсчёта или суммирования, чтобы получить результат на основе этих логических значений.

1. Сначала свяжите флажки с ячейками по отдельности: если флажок установлен, в ячейке отображается ИСТИНА, а если снят — ЛОЖЬ. См. снимок экрана:

2. Затем используйте следующие формулы, чтобы подсчитать или суммировать значения в зависимости от установленных флажков:

Подсчёт значений по установленным флажкам:

=COUNTIF(D2:D10,TRUE)

Примечание: В этой формуле D2:D10 — это диапазон связанных ячеек, которые вы задали для флажков.

Суммирование значений по установленным флажкам:

=SUMPRODUCT(($D$2:$D$10=TRUE)*$C$2:$C$10)

Примечание: В этой формуле D2:D10 — это диапазон связанных ячеек, назначенных флажкам, а C2:C10 — список ячеек, значения которых нужно просуммировать.

Пример 6: Возврат определённого значения при установке флажка

Если у вас есть флажок, при установке которого в ячейке должно появляться определённое значение, а при снятии — отображаться пустая ячейка, как показано в демонстрации ниже:

Чтобы выполнить эту задачу, сделайте следующее:

1. Сначала свяжите этот флажок с ячейкой. Щёлкните правой кнопкой мыши по флажку и выберите пункт Формат объекта. В появившемся диалоговом окне «Формат объекта» перейдите на вкладку Управление и укажите ячейку, с которой следует связать флажок, в поле Связь с ячейкой, см. снимок экрана:

2. Затем нажмите кнопку ОК, чтобы закрыть диалоговое окно. Теперь введите в ячейку, где должен отображаться результат, следующую формулу: =IF(A5=TRUE,«Extendoffice»,«»), а затем нажмите клавишу Enter.

Примечание: В этой формуле A5 — это ячейка, связанная с флажком, а «Extendoffice» — конкретный текст. Вы можете изменить их по своему усмотрению.

3. Теперь при установке флажка будет отображаться указанный текст, а при снятии — ячейка станет пустой. См. демонстрацию ниже:

Лучшие инструменты повышения продуктивности в Office

🤖	KUTOOLS AI Помощник: Преобразуйте Анализ данных с помощью:Интеллектуального выполнения   |  Генерации кода|  Создания пользовательские формулы  |  Анализа данных и построения диаграмм|  Вызова Расширенные функции…
	Популярные функции:Поиск, выделение или Отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячеек без потери данных   |  Округление без использования формул…
	Супер ПОИСК:VLookup по нескольким критериям  |  VLookup по нескольким значениям  |   VLookup по нескольким листам   |   Распознавание нечетких соответствий…
	Расширенный раскрывающийся список:Быстрое создание выпадающего списка   |  Зависимый выпадающий список   |  Выпадающий список с множественным выбором…
	Управление столбцами:Добавление заданного количества столбцов|Перемещение столбцов|Переключение видимости скрытых столбцов|Сравнение диапазонов и столбцов…
	Избранные функции:Сетка фокусировки   |  Просмотр дизайна   |Улучшенная строка формулы   | Управление рабочими книгами и листами   |  Библиотека ресурсов(автотекст)|  Выбор даты   |  Объединить листы  |  Шифрование/Расшифровать ячейки   | Отправка писем по списку   |  Супер фильтр   |   Специальный фильтр(Фильтр ячеек с жирным шрифтом/курсив/зачёркивание…) …
	Лучшие наборы инструментов 15:12 Текстовыеинструменты(Добавить текст,Удалить определенные символы, …)|   50+Типыдиаграмм(Диаграмма Ганта, …)|   40+ Практические формулы(Рассчитать возраст на основе даты рождения, …)|   19 Инструментывставки(Вставить QR-код,Вставка изображения по пути, …)|   12 Инструментыпреобразования(Преобразовать в слова,Конвертация валют, …)|   7 Объединить и разделитьИнструменты(Расширенное объединение строк,Разделить ячейки, …)|… и многое другое

Используйте Kutools на предпочитаемом языке — поддержка английского, испанского, немецкого, французского, китайского и ещё 40+ языков!

Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…

Подробнее о Kutools для Excel…Бесплатная загрузка…

---

Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу

• Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
• Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
• Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Подробнее о Office Tab…Бесплатная загрузка…

---

Все надстройки Kutools — один установщик

Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.

• Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
• Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
• Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
• 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
• Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек

Подробнее о Kutools for Office…Бесплатная загрузка…