Как выбрать все листы, кроме одного, в Excel?

Мы можем использовать функцию «Выбрать все листы», чтобы выбрать все вкладки листов книги, но есть ли у вас идеи, как выбрать все листы, кроме определенного, в Excel?

Выбор всех вкладок листов, кроме определенной, с помощью кода VBA

Выбор всех вкладок листов, кроме определенной, с помощью кода VBA

Чтобы выбрать все вкладки, кроме определенной, следующий код VBA может вам помочь, выполните следующие действия:

1. Нажмите и удерживайте клавиши ALT + F11, затем откроется окно Microsoft Visual Basic for Applications.

2. Щелкните Вставить > Модуль и вставьте следующий код в окно Модуля.

Код VBA: Выбрать все листы, кроме одного:

Sub selectallbutone()
'Updateby Extendoffice
Dim x As Long
Sheet1.Select
For x = 2 To ThisWorkbook.Sheets.Count
    If Sheets(x).Name <> "Sheet5" Then Sheets(x).Select Replace:=False
Next x
End Sub

Примечание: В приведенном выше коде Sheet5 — это имя листа, который вы хотите исключить при выборе всех листов, измените его по своему усмотрению.

3. Затем нажмите клавишу F5 для запуска этого кода, и все вкладки листов будут выбраны, кроме определенной, см. скриншот:

Раскройте магию Excel с Kutools AI

• Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
• Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
• Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
• Интерпретация формул: Легко разбирайтесь в сложных формулах.
• Перевод текста: Преодолейте языковые барьеры в ваших таблицах.

Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!