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

Kutools для Office — один пакет. Пять инструментов. Выполняйте больше.

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

Author Siluvia Last modified

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

Изменение значения указанной ячейки при отметке флажка с помощью формулы
Изменение значения указанной ячейки при отметке флажка с помощью кода 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 по нескольким значениям | Многолистовой поиск | Распознавание нечетких соответствий ...
Расширенный раскрывающийся список: Быстро создать раскрывающийся список | Зависимый раскрывающийся список | Множественный выбор в раскрывающемся списке ...
Менеджер столбцов: Добавить определённое количество столбцов | Переместить столбцы | Переключить видимость скрытых столбцов | Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка фокусировки | Дизайн листа | Улучшенная строка формулы | Управление книгой и листами | Библиотека автотекста | Выбор даты | Объединить данные | Зашифровать/расшифровать ячейки | Отправить письмо по списку | Супер фильтр | Специальный фильтр (фильтр жирный/курсив/зачеркнутый...) ...
Топ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% и уменьшите количество щелчков мышью на сотни ежедневно!

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

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

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