Как скрыть или показать столбцы на основе выбора раскрывающегося списка в Excel?
При использовании Excel вы можете скрыть или показать определенные столбцы на основе выбора раскрывающегося списка. Например, если вы выберете «Нет» в раскрывающемся списке, столбцы от C до I будут скрыты, но если вы выберете «Да», скрытые столбцы от C до I будут отображаться. См. Снимок экрана ниже.
В этой статье мы покажем вам метод VBA для скрытия или отображения столбцов на основе выбора раскрывающегося списка в Excel.
Скрыть или отобразить столбцы на основе выбора раскрывающегося списка в Excel
Скрыть или отобразить столбцы на основе выбора раскрывающегося списка в Excel
Как упоминалось выше, чтобы скрыть или показать столбцы от C до I на основе выбора раскрывающегося списка, сделайте следующее.
1. Сначала создайте раскрывающийся список с Да и Нет, которые вам нужны.
2. Затем нажмите другой + F11 для открытия Microsoft Visual Basic для приложений окно.
3. Дважды щелкните имя текущего открытого листа в ВБАПроект раздел, чтобы открыть редактор кода.
4. Затем скопируйте и вставьте ниже код VBA в редактор кода.
Код VBA: скрыть или отобразить столбцы на основе выбора раскрывающегося списка
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20180822
If Target.Column = 2 And Target.Row = 3 Then
If Target.Value = "No" Then
Application.Columns("C:I").Select
Application.Selection.EntireColumn.Hidden = True
ElseIf Target.Value = "Yes" Then
Application.Columns("C:I").Select
Application.Selection.EntireColumn.Hidden = False
End If
End If
End Sub
Внимание: В приведенном выше коде Column = 2 и Row = 3 - это ссылка на ячейку в раскрывающемся списке, а диапазон C: I - это столбцы, которые вы хотите скрыть или показать, пожалуйста, измените их по своему усмотрению.
5. Нажмите другой + Q одновременно клавиши для выхода из Microsoft Visual Basic для приложений окно.
С этого момента, когда вы выбираете Нет в раскрывающемся списке, все указанные столбцы скрываются.
Но если вы выберете Да в раскрывающемся списке, все скрытые столбцы отобразятся немедленно.
Разблокируйте магию Excel с помощью Kutools AI
- Умное исполнение: выполнение операций с ячейками, анализ данных и создание диаграмм — и все это осуществляется с помощью простых команд.
- Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации рабочих процессов.
- VBA-кодирование: Пишите и внедряйте код VBA без особых усилий.
- Интерпретация формулы: Легкое понимание сложных формул.
- Перевод текста: преодолевайте языковые барьеры в своих таблицах.
Статьи по теме:
- Как автоматически заполнять другие ячейки при выборе значений в раскрывающемся списке Excel?
- Как выполнить автозаполнение при вводе в раскрывающемся списке Excel?
- Как создать календарь с выпадающим списком в Excel?
- Как создать выпадающий список с возможностью поиска в Excel?
- Как создать раскрывающийся список с множественным выбором или значениями в Excel?
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!