Skip to main content

How to select all sheets except one in Excel?

We can apply the Select All Sheets feature to select all sheet tabs of a workbook, but, do you have any ideas to select all sheets except the specific one in Excel?

Select all sheet tabs except specific one with VBA code


arrow blue right bubble Select all sheet tabs except specific one with VBA code

To select all tabs except specific one, the following VBA code can help you, please do as this:

1. Hold down the ALT + F11 keys, then it opens the Microsoft Visual Basic for Applications window.

2. Click Insert > Module, and paste the following code in the Module Window.

VBA code: Select all sheets except one:

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

Note: In the above code, Sheet5 is the sheet name that you want to exclude when selecting all sheets, please change it to your need.

3. And then press F5 key to run this code, and all sheet tabs have been selected except the specific one, see screenshot:

doc select all tabs except one 1

Best Office Productivity Tools

Supercharge Your Spreadsheets: Experience Efficiency Like Never Before with Kutools for Excel

Popular Features: Find/Highlight/Identify Duplicates   |  Delete Blank Rows   |  Combine Columns or Cells without Losing Data   |   Round without Formula ...
Super Lookup: Multiple Criteria VLookup    Multiple Value VLookup  |   VLookup Across Multiple Sheets   |   Fuzzy Lookup ....
Advanced Drop-down List: Quickly Create Drop Down List   |  Dependent Drop Down List   |  Multi-select Drop Down List ....
Column Manager: Add a Specific Number of Columns     Move Columns   |   Unhide Columns   |   Compare Columns to Select Same & Different Cells ...
Featured Features: Grid Focus   |  Design View   |   Big Formula Bar    Workbook & Sheet Manager   |  Resource Library (Auto Text)   |  Date Picker   |  Combine Worksheets   |  Encrypt/Decrypt Cells    Send Emails by List   |  Super Filter   |   Special Filter (filter bold/italic/strikethrough...) ...
Top 15 Toolset12 Text Tools (Add Text, Remove Characters, ...)   |   50+ Chart Types (Gantt Chart, ...)   |   40+ Practical Formulas (Calculate age based on birthday, ...)   |   19 Insertion Tools (Insert QR Code, Insert Picture from Path, ...)   |   12 Conversion Tools (Numbers to Words, Currency Conversion, ...)   |   7 Merge & Split Tools (Advanced Combine Rows, Split Cells, ...)   |   Many More...

Kutools for Excel boasts over 300 features, ensuring that what you need is just a click away...

Supports Office/Excel 2007-2021 & newer, including 365   |   Available in 44 languages   |   Enjoy a full-featured 30-day free trial.

kte tab 201905


Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Boa noite!
Por gentileza, tenho um Excel que possui 17 planilhas, sendo que duas delas são a Legenda e a outra Validação, as demais são sequencias numéricas que são tipo Relatóri1, Relatório2, até chegar no Relatório15.
teria como eu selecionar as planilhas de relatórios na sequência numérica através de uma célula variável que se eu colocar o valor 5, por exemplo; a macro seleciona de Relatório1 ao 5?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations