Hide all worksheet tab until selected

When opening workbook close all sheets (I've put also example if you don't want to hide some sheet):

Please Login or Register  to view this content.

And then when click on listbox just unhide it:

Please Login or Register  to view this content.

First part works Great, can not get it to go to sheet when selected from listbox1

Setting should be dependant on listbox

Please Login or Register  to view this content.

but would need example to work with it.

Here it is, if you have time.One problem I'm having is my sort will not work with hidden sheets.

Got this far, but when another list item is selected it should hide current sheet and unhide new item.

Please Login or Register  to view this content.

Didn't yet see your file but based on your code try to create macro from above:

Please Login or Register  to view this content.

Then call it when opening sheet:

Please Login or Register  to view this content.

But also each time you run macro:

Please Login or Register  to view this content.

Here, I've copy above codes for you.

Since (at least) one sheet must always be visible I've use Sheet1 for that.

I See, I was putting Sub Hide Sheets in wrong,Thank you for showing me. Is there a way around sorting the sheets now or will I just
unhide all before sort. Not sure what is best way.

Please Login or Register  to view this content.

You need to sort them only once right?
Since after that they will always be sorted.
You can do that too on workbook open

Thanks for all your help zbor, tried the sort code in workbook open before hiding sheets with no luck.Just added a button to
userform to unhide and sort.

Try replace Worksheet open with this:

Please Login or Register  to view this content.

If you want to sort them each time then you can put upper part of the code within Hide_sheets macro.

Thanks for the Code work zbor, what a nice surprise. Again Thank You for helping.