Как удалить все столбцы на основе значения заголовка в Excel?
Во многих случаях вам может понадобиться удалить все столбцы на основе значения заголовка в Excel. Например, вам нужно удалить все столбцы, которые содержат значение «старый» в заголовке. В этом руководстве мы покажем вам методы удаления всех столбцов на основе значения заголовка более подробно.
Удаление всех столбцов на основе значения заголовка с помощью кода VBA
Удаление всех столбцов на основе значения заголовка с помощью Kutools для Excel
Удаление всех столбцов на основе значения заголовка с помощью кода VBA
Вы можете удалить все столбцы на основе значения заголовка с помощью кода VBA. Пожалуйста, действуйте следующим образом.
1. Нажмите клавиши Alt + F11 одновременно, чтобы открыть окно Microsoft Visual Basic Application.
2. В окне Microsoft Visual Basic Application нажмите Вставить > Модуль. Затем скопируйте и вставьте приведенный ниже код в окно Модуля.
Код VBA: удаление всех столбцов на основе значения заголовка
Sub DeleteSpecifcColumn()
Set MR = Range("A1:D1")
For Each cell In MR
If cell.Value = "old" Then cell.EntireColumn.Delete
Next
End SubПримечания:
3. Нажмите клавишу F5, чтобы запустить код, и весь столбец с заголовком, равным указанному тексту, будет немедленно удален.
Удаление всех столбцов на основе значения заголовка с помощью Kutools для Excel
С помощью утилиты Выбрать определенные ячейки из Kutools для Excel вы можете легко сначала выбрать все столбцы, содержащие определенное значение заголовка, а затем сразу удалить эти выбранные столбцы. Пожалуйста, действуйте следующим образом.
1. Выберите диапазон, который содержит столбцы, которые необходимо удалить, а затем нажмите Kutools > Выбрать > Выбрать определенные ячейки. См. скриншот:
2. В диалоговом окне Выбрать определенные ячейки выберите параметр Весь столбец в разделе Тип выбора, а в раскрывающемся списке Указать тип выберите параметр Равно, затем введите значение заголовка в следующее поле. И, наконец, нажмите кнопку ОК. См. скриншот:
3. Нажмите кнопку ОК в другом всплывающем диалоговом окне, затем столбцы, содержащие указанное значение заголовка, будут немедленно выбраны.
4. Щелкните правой кнопкой мыши заголовок выбранного столбца, а затем нажмите Удалить в контекстном меню. После этого все выбранные столбцы будут удалены сразу.
Если вы хотите воспользоваться бесплатной пробной версией (30-день) этой утилиты, пожалуйста, нажмите, чтобы скачать её, а затем перейдите к выполнению операции согласно вышеуказанным шагам.
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с помощью Kutools для Excel и ощутите эффективность на новом уровне. Kutools для Excel предлагает более300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы выбрать функцию, которая вам нужнее всего...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите режим вкладок для редактирования и чтения в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна вместо новых отдельных окон.
- Увеличьте свою продуктивность на50% и уменьшите количество щелчков мышью на сотни ежедневно!
Все надстройки Kutools. Один установщик
Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек