Оглавление
В Microsoft Excel мы можем удалить несколько листов с помощью различных простых подходов. Мы можем применять опции из контекстного меню или лент Excel, а иногда мы также можем вставить коды VBA, чтобы удовлетворить наши требования. В этой статье вы узнаете все подходящие методы удаления нескольких листов в Excel с соответствующими примерами и иллюстрациями.
Практическая рабочая тетрадь
Загрузите следующую рабочую тетрадь и упражнения.
Удалить несколько листов.xlsx4 простых способа удаления нескольких листов в Excel
1. Используйте опцию ленты для удаления нескольких листов в Excel
Из Лента мы можем удалить несколько листов.
ШАГИ:
- Выберите листы, которые мы хотим удалить, нажав и удерживая кнопку Смена ключ.
- Теперь перейдите к Главная вкладку и выберите Удалить > Удалить лист .
- Откроется диалоговое окно.
- Нажмите OK .
- Затем мы видим, что выбранные листы удалены.
2. Используйте опцию листа для удаления нескольких листов в Excel
2.1 Рабочий лист "Для примыкания
Для удаления нескольких смежных рабочих листов необходимо выполнить следующие действия.
ШАГИ:
- Нажав и удерживая кнопку Смена выделите мышью первый и последний лист, который мы хотим удалить.
- Щелкните правой кнопкой мыши кнопку мыши на вкладке Лист и выберите Удалить .
- Наконец, листы удаляются.
2.2 Для несмежного рабочего листа
Мы также можем удалить несмежные рабочие листы.
ШАГИ:
- Выберите ячейки, которые мы хотим удалить, нажав кнопку Ctrl ключ.
- Теперь перейдите на вкладку Лист, Щелкните правой кнопкой мыши на мышке и выберите Удалить .
- Появится диалоговое окно.
- Нажмите OK и посмотреть результат.
3. Удаление нескольких рабочих листов с помощью гибридной клавиатуры
Удаление нескольких рабочих листов в Excel с помощью клавиатуры - один из самых простых и быстрых способов. Нам просто нужно выбрать листы, Щелкните правой кнопкой мыши на вкладке Лист и нажмите кнопку D с клавиатуры. Листы будут удалены.
4. Вставка кодов VBA для удаления нескольких листов Excel
4.1 Удаление всех листов с сохранением активного листа
VBA является одним из наиболее подходящих методов удаления всех листов, кроме активного листа.
ШАГИ:
- На вкладке листа выберите активный лист, Щелкните правой кнопкой мыши на мышке и выберите Посмотреть код .
- Теперь скопируйте следующие коды и вставьте их в свой модуль VBA.
Option Explicit Sub deletemultiplesheets() Dim spreadsheet As Worksheet Application.DisplayAlerts = False For Each spreadsheet In Sheets If spreadsheet.Name ActiveSheet.Name Then spreadsheet.Delete End If Next spreadsheet Application.DisplayAlerts = True End Sub
- Нажмите кнопку Запускайте и мы увидим, что все листы удалены, кроме активного.
Подробнее: Как удалить лист Excel с помощью VBA (10 макросов VBA)
4.2 Удаление листов с определенной текстовой строкой
Мы можем легко удалить все листы с определенной текстовой строкой.
ШАГИ:
- Выберите лист на вкладке Лист.
- Сейчас Щелкните правой кнопкой мыши на мышке и выберите Посмотреть код .
- Затем скопируйте следующие коды и вставьте их в свой модуль VBA. И нажмите на кнопку Запускайте вариант.
Option Explicit Sub DeleteSheetWithSameName() Dim spreadsheet As Worksheet Application.DisplayAlerts = False For Each spreadsheet In sheets If spreadsheet.Name Like "*" & "Sales1" & "*" Then MsgBox spreadsheet.Name spreadsheet.Delete End If Next spreadsheet Application.DisplayAlerts = True End Sub
- Появится диалоговое окно для подтверждения и выбора OK .
- Наконец, мы видим, что выбранные листы с выбранными текстовыми строками удалены.
Заключение
Следуя этим методам, мы можем легко удалить несколько листов в Excel. Добавлена рабочая тетрадь для тренировки. Попробуйте ее. Не стесняйтесь спрашивать о чем-либо или предлагать новые методы.