Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

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

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

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


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


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

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

2. В открытии Microsoft Visual Basic для приложений окно, скопируйте ниже кода 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. нажмите другой + Q для закрытия Microsoft Visual Basic для приложений окна.

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


Статьи по теме:



Рекомендуемые инструменты для повышения производительности в Excel

Kutools для Excel помогает всегда завершать работу раньше времени и выделяться из толпы

  • Больше, чем мощные расширенные функции 300, разработанные для рабочих сценариев 1500, повышающие производительность на 70%, дают вам больше времени, чтобы заботиться о семье и радоваться жизни.
  • Больше не нужно запоминать формулы и коды VBA, дайте вашему мозгу отдохнуть.
  • Станьте экспертом по Excel за минуты 3. Сложные и повторяющиеся операции можно выполнить за считанные секунды,
  • Ежедневно сокращайте тысячи операций с клавиатурой и мышью, попрощайтесь с профессиональными заболеваниями сейчас.
  • Высокоэффективные люди 110,000 и выбор всемирно известных компаний 300 +.
  • 60-Day полнофункциональная бесплатная пробная версия. 60-день гарантии возврата денег. 2 лет бесплатного обновления и поддержки.

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

  • Вкладка Office предназначена для Word, Excel, PowerPoint и других приложений Office: Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    امید کیا · 7 months ago
    سلام وقت شما بخیر
    ما فایل اکسلی داریم که خروجیش از طریق نرم افزار همکاران سیستم هست یعنی فایل اکسل ما آنلاین به data base نرم افزار همکاران متصله(این مهم نیست برای اطلاع عرض کردم) توی این فایل فیلترهایی وجود داره که هر فیلتر یک لیست کشویی داره مشکل ما اینه که وقتی میخواهیم هر کدوم از فیلتر ها یکی از موارد لیست کشویی رو انتخاب کنیم با انتخاب لیست،لیست کشویی زود می پره یعنی بسته میشه زود و نمیشه چیزی رو انتخاب کرد،اینم بگم خدمتتون که آفیس رو حذف و نصب هم کردم بازم جواب نداد یعنی یه مدت خیلی کوتاهی جواب میده بعد به حالت قبل بر میگرده با پشتیبانی همکاران هم تماس گرفتیم گفتن مشکل از آفیستونه
    (آفیسمون 2016 هست)یعنی عملا اونها هم نتونستن مشکل رو پیدا کنن.
    لطفا اگه راهی هست ممنون میشم راهنماییم کنید.
    با تشکر