Как удалить несколько листов в Excel (7 методов)
8 апреля 2022 г.
Многие люди предпочитают, чтобы их книги Excel содержали только самую важную информацию. Если вы хотите очистить книгу и удалить ненужные данные, вы можете удалить сразу несколько строк. Есть много методов, которые вы можете выбрать для достижения этой цели, и изучение их может помочь вам выбрать метод, отвечающий вашим потребностям. В этой статье мы объясним ситуации, в которых эта практика может быть полезна, и поделимся семью методами удаления нескольких листов в Excel.
Когда удалять несколько листов в Excel
Вот некоторые ситуации, в которых вам может понадобиться удалить несколько листов в Excel:
Избыточность: если вы заменили листы более актуальной версией, вы можете удалить старые листы для ясности.
Организация: чтобы сделать ваш файл более читабельным, вы можете удалить ненужные листы, а удаление нескольких листов одновременно может ускорить процесс.
Безопасность. Если вы работали над проектом, содержащим конфиденциальные данные, вы можете удалить листы, когда закончите использовать их для защиты информации компании.
Ошибки: в файл можно случайно добавить дополнительные листы, в результате чего вам останется удалить лишние листы.
Хранилище: файлы Excel с большим количеством листов могут быть большими, и если вы хотите сэкономить место, вам может помочь консолидация вашей информации и удаление лишних листов.
Как удалить несколько соседних листов в Excel с помощью опции листа
Вот как использовать параметр листа для удаления нескольких листов в Excel:
Удерживайте нажатой кнопку «Shift» на клавиатуре.
В нижней части окна Excel выберите вкладки листов, которые вы хотите удалить.
Щелкните правой кнопкой мыши любой из выбранных листов, чтобы открыть раскрывающееся меню.
В верхней части раскрывающегося меню вы можете увидеть опцию «Удалить». Щелкните этот параметр. Вы также можете щелкнуть правой кнопкой мыши и нажать «D» на клавиатуре, чтобы удалить.
Как удалить несколько несмежных листов в Excel с помощью опции листа
Вот как использовать параметр листа для удаления нескольких несмежных листов в Excel:
Нажмите и удерживайте клавишу «Ctrl» на клавиатуре.
Удерживая нажатой клавишу «Ctrl», щелкните каждую вкладку листов, которые вы хотите удалить, чтобы выбрать их.
Щелкните правой кнопкой мыши вкладку листа и найдите в меню «Удалить».
Нажмите «Удалить» или нажмите кнопку «D» на клавиатуре, чтобы удалить выбранные листы.
Как удалить несколько листов в Excel с помощью опции ленты
Вот как использовать параметр ленты для удаления нескольких листов в Excel:
Нажмите и удерживайте клавишу «Shift».
Выберите листы, которые вы планируете удалить под своими данными.
Перейдите на вкладку «Главная» на ленте.
Найдите группу «Ячейки» в правой части ленты и щелкните стрелку, чтобы открыть раскрывающееся меню.
Вы можете увидеть значок с несколькими ячейками и красным знаком «X» с надписью «Удалить». Нажмите эту кнопку.
Появится раскрывающееся меню. Выберите «Удалить лист».
Как удалить несколько листов в Excel с помощью VBA
Вот как использовать Visual Basic для приложений (VBA), язык программирования Excel, для удаления нескольких листов:
Нажмите клавишу «Alt» и клавишу «F11» на клавиатуре, чтобы открыть редактор Visual Basic (VBE).
Панель «Project-VBAProject» может появиться в верхнем левом углу окна. На этой панели найдите один из своих листов и щелкните правой кнопкой мыши.
Перейдите к опции «Вставить» и наведите указатель мыши на стрелку.
В выпадающем меню выберите опцию «Модуль».
Затем Excel открывает окно, в котором вы можете ввести код. Вставьте следующий код:
Sub Delete_Multiple_Excel_Worksheets() ‘объявить переменные
Dim ws1 как рабочий лист
Dim ws2 как рабочий лист
Dim ws3 как рабочий листУстановите ws1 = Рабочие листы («Лист1»)
Установите ws2 = Рабочие листы («Лист2»)
Установите ws3 = Рабочие листы («Лист3»)‘удалить три листа одновременно
ws1.Удалить
ws2.Удалить
ws3.УдалитьКонец сабвуфера
Измените имена листов в коде, чтобы отразить листы, которые вы хотите удалить.
При сохранении книги Excel может спросить вас, хотите ли вы сохранить книгу без макросов. Чтобы сохранить проект VB, выберите «Нет».
Как удалить все листы, кроме активного листа в Excel с помощью VBA
Вот как удалить каждый лист, кроме активного, с помощью VBA:
Щелкните правой кнопкой мыши вкладку активного листа в нижней части окна.
Выберите «Просмотреть код».
Может появиться окно с модулем VBA. Введите следующий код:
Опция ExplicitSub удалить несколько листов ()
Dim электронная таблица как рабочий лист
Application.DisplayAlerts = Ложь
Для каждой электронной таблицы в листах
Если электронная таблица.Имя <> ActiveSheet.Имя Тогда
электронная таблица.Удалить
Конец, если
Следующая таблица
Application.DisplayAlerts = Истина
Конец сабвуфераНажмите «Выполнить», чтобы активировать код и удалить все неактивные электронные таблицы.
Включите макросы при сохранении книги, чтобы сохранить работоспособность проекта VB.
Как удалить несколько листов с определенной текстовой строкой в Excel с помощью VBA
Вот как использовать VBA для удаления нескольких листов с определенной текстовой строкой:
Щелкните имя электронной таблицы, которую вы хотите удалить, на вкладках листов в нижней части окна.
Щелкните правой кнопкой мыши имя, чтобы открыть меню параметров.
Выберите «Просмотр кода», чтобы открыть модуль VBA.
Вставьте следующий код:
Опция ExplicitSub DeleteSheetWithSameName()
Dim электронная таблица как рабочий лист
Application.DisplayAlerts = Ложь
Для каждой электронной таблицы В листах
Если электронная таблица.Имя Как “Текстовая строка” & “Текстовая строка” & “Текстовая строка” Тогда
Электронная таблица MsgBox.Имя
электронная таблица.Удалить
Конец, если
Следующая таблица
Application.DisplayAlerts = Истина
Конец сабвуфераЗамените каждую «Текстовую строку» текстовой строкой, включенной в любые листы, которые вы хотите удалить. Вы можете вручную добавить дополнительные текстовые строки, если вам нужно удалить больше листов, чем включает код.
Нажмите «Выполнить», чтобы активировать код.
Excel предоставляет вам диалоговое окно для подтверждения каждого листа, который вы хотите удалить. Убедитесь, что вы ввели правильные имена листов, и нажмите «ОК».
Сохраните файл с включенными макросами.
Как удалить несколько листов с помощью сочетания клавиш
Вот как использовать сочетание клавиш для удаления нескольких листов в Excel:
Выберите рабочие листы, которые вы хотите удалить.
Нажмите клавишу «Alt» на клавиатуре.
Отпустите «Alt», затем нажмите клавишу «H».
После нажатия «H» нажмите клавишу «D».
Завершите ярлык, нажав «S».
Советы по удалению нескольких листов в Excel
Вот несколько советов, которые могут помочь вам успешно удалить сразу несколько листов в Excel:
Просмотрите ресурсы VBA, прежде чем манипулировать кодом
Если вы новичок в программировании, все еще можно успешно использовать параметры VBA. Чтобы ознакомиться с тем, как работает VBA, может быть полезно изучить эту функцию и прочитать учебные материалы, объясняющие основы. Если в вашей организации есть специалисты, работающие с кодом, они могут помочь вам понять и настроить модули VBA.
Проверьте свою работу
Если вы работаете с большим объемом данных, важно двигаться осторожно, чтобы сохранить все листы, которые вам еще нужны. Прежде чем завершить удаление, еще раз проверьте, правильно ли вы ввели или выбрали листы. Некоторые методы позволяют восстановить удаленные листы, но полезно выработать привычку регулярно просматривать свою работу.
Выберите метод, который соответствует вашим потребностям
Хотя некоторые методы могут показаться проще, чем другие, вы можете сэкономить время и энергию, просмотрев каждый метод и оценив свои потребности. Ваши данные могут лучше реагировать на код VBA, отвечающий вашим конкретным потребностям. Например, если у вас большой объем листов, и ваш менеджер просит вас удалить все, что упоминает завершенный проект, использование параметра текстовой строки может помочь вам удалить их, не просматривая каждый лист вручную.
Обратите внимание, что ни один из продуктов, упомянутых в этой статье, не связан с компанией Indeed.