Перейти к содержимому

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

Author: Siluvia Last Modified: 2025-08-07

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

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


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

Предположим, вам нужно заполнить ячейку A1 значением «test», когда флажок 1 отмечен. И очистить ячейку при снятии отметки с флажка. Пожалуйста, выполните следующие действия.

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

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

enter a formula into the Formula Bar after selecting the checkbox

Для флажка ActiveX Control щелкните его правой кнопкой мыши и выберите Свойства из контекстного меню. В диалоговом окне Свойства введите связанную ячейку в поле LinkedCell, а затем закройте диалоговое окно. Смотрите скриншот:

select Properties and set options

2. Выберите ячейку, значение которой нужно изменить (здесь я выбираю A1), затем введите формулу =ЕСЛИ(C2,"Test","") в строку формул и нажмите клавишу Enter. Смотрите скриншот:

Select the cell to change its value and enter a formula

Примечание: В формуле C2 — это связанная ячейка флажка 1, «Test» — это значение, которое необходимо отобразить в ячейке A1, когда флажок отмечен.

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

the value is changed based on the checkbox is checked or unchecked

a screenshot of kutools for excel ai

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

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

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

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

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

2. В окне Microsoft Visual Basic for Applications скопируйте и вставьте приведенный ниже код VBA в окно Код.

Код VBA: Изменение значения указанной ячейки при отметке флажка

Private Sub CheckBox1_Click()
Dim xRng As Range
Dim xCell As Range, xStr As String
Set xRng = Selection
If CheckBox1.Value = True Then
    xStr = InputBox("Please enter a value:", "Kutools for Excel")
    xRng.Value = xStr
    If xStr = "" Then CheckBox1.Value = False
Else
    xRng.Value = ""
End If
End Sub

click View Code and insert the code into the sheet module

Примечание: В коде ChekBox1 — это имя Флажка (ActiveX Controls). Вы можете изменить его по своему усмотрению.

3. Нажмите клавиши Alt + Q одновременно, чтобы закрыть окно Microsoft Visual Basic for Applications.

4. Выберите пустую ячейку (A1), значение которой вы хотите изменить на основе флажка, и отметьте флажок1 на вашем листе. Теперь появится диалоговое окно Kutools для Excel, пожалуйста, введите значение, которое должно быть заполнено в выбранной пустой ячейке, и нажмите кнопку ОК. Смотрите скриншот:

enter the value you want to be populated in the selected blank cell

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

the specified value is displayed if check the checkbox, otherwise, blank shown

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


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

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

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

2. В окне Microsoft Visual Basic for Applications скопируйте и вставьте приведенный ниже код VBA в окно Код.

Код VBA: Изменение цвета указанной ячейки при отметке флажка

Sub CheckBox1_Click()
Dim xRng As Range
Set xRng = Selection
If CheckBox1.Value = True Then
    xRng.Interior.Color = vbRed
Else
    xRng.Interior.Color = xlNone
End If
End Sub

click View Code and inser the code into the sheet module

Примечание: В коде ChekBox1 — это имя Флажка (ActiveX Controls). Вы можете изменить его по своему усмотрению.

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

fill color of the selected cell is change if check the chekbox, otherwise, no fill color


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

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

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

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


Office Tab добавляет вкладочный интерфейс в Office, делая вашу работу значительно проще

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