Исключительное содержимое Excel сбрасывается на основе другой ячейки, очищаемой

Question

У меня есть ячейка на Sheet1, которая содержит раскрывающийся список, скажем N3. Элементы в раскрывающемся списке изменяются в зависимости от значения в J3. При запуске обе ячейки пусты. Введите данные в J3, а раскрывающийся список в N3. Если я очистил содержимое J3, выпадающее меню в N3 теперь пустое, но последнее выбранное значение (если оно было выбрано) все равно появляется как запись «призрак». Это призрачная запись в ME, потому что это старые данные, но я понимаю, что программное обеспечение работает так, как было разработано. Если J3 очищается от содержимого, как я могу удалить N3 из этого последнего выбора? Я не обучен VBA, но достаточно опасен, чтобы справиться с этим, если это необходимо для этого. благодаря!

Answer 1

Вы можете рассмотреть возможность использования события workheet_change. Введите приведенный ниже код в модуле code1.

Private Sub Worksheet_Change(ByVal Target As Range) 

    On Error GoTo err_rout 

    Application.EnableEvents = False 

    If Not Intersect(Range("J3"), Target) Is Nothing And Target.Value = vbNullString Then 
     Range("N3").Value = vbNullString 
    End If 

err_rout: 
    Application.EnableEvents = True 
End Sub