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

or

Как удалить целые столбцы на основе значения заголовка в Excel?

Во многих случаях вам может потребоваться удалить все столбцы на основе значения заголовка в Excel. Например, вам нужно удалить все столбцы, которые содержат значение «old» в заголовке. В этом уроке мы покажем вам методы удаления целых столбцов на основе значения заголовка.

Удалить целые столбцы на основе значения заголовка с кодом VBA

Удалить целые столбцы на основе значения заголовка с помощью Kutools for Excel

Вкладка «Office» Включите редактирование и просмотр с вкладками в Office и упростите свою работу ...
Kutools для Excel переносит расширенные функции 300 в Excel и мгновенно повышает производительность
  • Super Formula Bar (легко редактировать несколько строк текста и формул); Чтение макета (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон ...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объединить дублирующиеся строки и сумму / среднее ... Предотвратить повторяющиеся клетки; Сравнить диапазоны ...
  • Выберите Дублировать или Уникальные строки; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих книгах; Случайный выбор ...
  • Точное копирование нескольких ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставьте маркеры, флажки и многое другое ...
  • Любить и быстро вставлять формулы, диапазоны, графики и рисунки; Шифровать ячейки с помощью пароля; Создать список рассылки и отправлять электронные письма ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев ...
  • Суперфильтр (сохранение и применение схем фильтрации к другим листам); Расширенный Сортировать по месяцу / неделе / ​​дню, частоте и многому другому; Специальный фильтр жирным шрифтом, курсив ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разбить данные на несколько листов; Пакетное конвертирование xls, xlsx и PDF ...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.

arrow синий правый пузырь Удалить целые столбцы на основе значения заголовка с кодом VBA


Вы можете удалить целые столбцы на основе значения заголовка с кодом VBA. Пожалуйста, сделайте следующее.

1. Нажмите другой + F11 , чтобы открыть Приложение Microsoft Visual Basic окна.

2. в Приложение Microsoft Visual Basic окна, нажмите Вставить > модуль, А затем скопируйте и вставьте ниже код в окно модуля.

Код VBA: удалять целые столбцы на основе значения заголовка

Sub DeleteSpecifcColumn()
	Set MR = Range("A1:D1")
	For Each cell In MR
		If cell.Value = "old" Then cell.EntireColumn.Delete
	Next
End Sub

Внимание: в коде "старый"- это значение заголовка, которое вы хотите удалить на весь столбец. Измените значение заголовка вручную. А также A1: D1 это диапазон столбцов, который вы хотите использовать.

3. нажмите F5 ключ для запуска кода, весь столбец, который содержит указанное значение заголовка, немедленно удаляется.


arrow синий правый пузырь Удалить целые столбцы на основе значения заголовка с помощью Kutools for Excel

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

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно попробовать без ограничений в 60-дни.

1. Выберите диапазон, который содержит столбцы, которые необходимо удалить, и нажмите кнопку Kutools > Выбрать > Выберите конкретные ячейки, Смотрите скриншот:

2. в Выберите конкретные ячейки в диалоговом окне выберите Весь столбец вариант в Тип выбора и в Конкретный тип выпадающий список, выберите Равно , затем введите значение заголовка в следующем поле. И, наконец, нажмите OK кнопка. Смотрите скриншот:

3. Нажмите OK в другом всплывающем диалоговом окне, то столбцы, которые содержат указанное значение заголовка, будут выбраны сразу.

4. Щелкните правой кнопкой мыши заголовок столбца выбранного столбца, а затем щелкните Удалите файл из контекстного меню. Затем все выбранные столбцы удаляются сразу.

Если эта утилита полезна, вы можете загрузите и попробуйте бесплатную пробную версию!

  • Супер Формула Бар (легко редактировать несколько строк текста и формул); Макет чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объедините дублирующиеся строки и сумму / среднее... предотвратить повторяющиеся клетки; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения формулы ссылки; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Любимые и быстро вставляемые формулы, Диапазоны, графики и рисунки; Шифрование ячеек с паролем; Создать список рассылки и отправлять электронные письма ...
  • Извлечение текстаДобавить текст, Удалить по позиции, Удалить пространство; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев...
  • Суперфильтр (сохранить и применить схемы фильтров к другим листам); Расширенный поиск по месяцам / неделям / дням, частоте и более; Специальный фильтр жирным шрифтом, курсивом ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.
вкладка kte 201905
  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 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.
    Elias · 9 months ago
    Hey! This works well until you have two contiguous columns with the same header. Say your range is A1:A5, and A2 and A3 have the header 'old'. It will delete A2, but then the A3 will move to the place A2 used to occupy, and the code will skip it, as it will be looking at the new A3, the next cell on its range.
    • To post as a guest, your comment is unpublished.
      crystal · 9 months ago
      Hi Elias,
      As you mentioned, A2 and A3 have he same header "old". But they are in the same column, after applying the code, the whole column A will be removed immediately.
      I am not sure I get your point. Would be nice if you could provide screenshot of what you are trying to do.
  • To post as a guest, your comment is unpublished.
    Leonard Staggs · 2 years ago
    Sorry if this seems super basic but this is my first time trying vba. Using this how would I apply it to delete multiple column headers. I am actually trying to only keep certain header columns and delete the rest of a changing list.