Строгие зависимые списки (с проверкой уровней)

[Whizer]

Доброй ночи.
Создание зависимых списков - давно решённая проблема.
Но те варианты реализации, что мне удалось найти, не предполагают проверки соответствия уровней списков.

К примеру:
первый уровень списка - овощи и фрукты.
второй - апельсин, киви, яблоко, морковь, картофель.

Выбрав в первом уровне "овощи", второй уровень списка даст выбрать "морковь" и "картофель". Допустим, я выбрал "картофель" (получилось "овощи - картофель", логично). После этого я могу спокойно в первом уровне списка "овощи" заменить на "фрукты' и получится "фрукты - картофель", что не совсем правильно и не даёт желаемого результата.

Собственно, защиты "от дурака" уже и нет.
Давно ищу решение в интернете - безрезультатно.
Прошу вашей помощи.

[Казанский]

По событию Change первого комбобокса очищать второй?

[Whizer]

Был бы очень признателен за пример.

[Hugo121]

Есть и другие реализации - например макросом при изменении любой "вышестоящей" ячейки очищать все "нижестоящие".

[Казанский]

Сообщение от Whizer

Был бы очень признателен за пример.

Ваш пример - мы добавляем проверку.

[Whizer]

Пожалуйста.

[Hugo121]

В модуль листа:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target = [g7] Then [g8] = Empty
End Sub

[Whizer]

Hugo, спасибо.
Но если список на 8 тысяч строк?

[Hugo121]

8000 разных выпадающих списков, завязанных на разные имена?
Покажите пример

[Whizer]

Сообщение от Hugo121

8000 разных выпадающих списков, завязанных на разные имена?
Покажите пример

Нет, не разных списков, я не правильно выразился.
Вложение прикрепляю.