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

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

Очистка ячейки зависимого выпадающего списка после изменения выбора с помощью кода VBA

Очистка ячейки зависимого выпадающего списка после изменения выбора с помощью кода VBA

Следующий код VBA поможет вам очистить зависимый выпадающий список после изменения выбора в Excel.

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

2. В открывшемся окне Microsoft Visual Basic for Applications скопируйте следующий код VBA в окно.

Код VBA: очистка ячейки зависимого выпадающего списка после изменения выбора

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 2018/06/04
    Application.EnableEvents = False
    If Target.Column = 5 And Target.Validation.Type = 3 Then
        Target.Offset(0, 1).Value = ""
    End If
    Application.EnableEvents = True
End Sub

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

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

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

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

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

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

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

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