Hide any other sheet than the active one

I have a file with various sheets ; one is the main hub from which all others are accessible (those are hidden) through buttons with macros.

I'm trying to find a more elegant (and working) solution to the initial "code" I'm using right now (I assign a variation of this on each button that navigates through the pages) :

Sheets("Kiosk").Visible = True
Sheets("Support").Visible = False
Sheets("Divers").Visible = False
Sheets("Other").Visible = False
Sheets("Herbier").Visible = False
Sheets("Templates").Visible = False
Sheets("addresses").Visible = False
Sheets("Test").Visible = False
Sheets("Classified As UnClassified").Visible = False
Sheets("Proc?dures").Visible = False
Sheets("Quotes").Visible = False
Sheets("LinkCheck").Visible = False
Sheets("Repair").Visible = False

--------------------------------------

I wanted to find something a bit less cumbersome, that wouldn't need to constantly edit each code whenever a new page gets added to the file - it doesn't happen that often now, but it still remains long to edit.

Please Login or Register  to view this content.

This one was a test to exclude the sheets automatically added when saving a file.

Please Login or Register  to view this content.

I tried to put this as a Activate on the sheet, but then, the matter is to navigate between sheets, as I seem to lack targets to aim at. I might be looking way too far for this, or lacking a different perspective...

Try:

Please Login or Register  to view this content.

Hi @eawyne

Try this example, to navigate throu worksheets,
it has some code pieces in Thisworkbook module and in Main Sheet module.

Every time you create a new sheet, it puts a hyperlink to Main sheet in cell A1.
Every tima you activate Main sheet, it updates the list of worksheets

To navigate, just clik on the cell with the sheet name you need to open

You're welcome. Thanks for the rep.

Again, you're welcome