Sheet Tags 3

[sjpistolesi]

Has anyone created a module to list the Sheet Tags within a workbook?

 

[Loomah]

Hi
If by tags you mean names, this will list all sheet names in the first Worksheet of a Workbook, including hidden sheets

Sub sheetNames()
Dim s
For Each s In ThisWorkbook.Sheets
Worksheets(1).Range("A" & s.Index).Value = s.Name
Next
End Sub

;-) If a man says something and there are no women there to hear him, is he still wrong?
"...Three Lions On A Shirt..."

 

[sjpistolesi]

Loomah:

Thanks ... that was exactly what I needed. When I set up a list function for my users, they'll be very pleased. (Sometimes their working xl workbooks get so large, they find it time consuming to scroll through the sheets for the right one.)

Regards, Sandy

 

[Loomah]

Sandy
If that is the case there is a little tip you could share with them.....
In the bottom left corner of xl you can right click on the sheet navigation buttons to bring up a list of all the worksheets.

;-) If a man says something and there are no women there to hear him, is he still wrong?
"...Three Lions On A Shirt..."

 

[sjpistolesi]

Loomah .... Yes, I know that technique.

However, even that process' display of sheets is limited (often have to scroll through the "more" list) ... so I'll need to develop a utility function, and place a button on a toolbar for them, that will display the complete list.

Thanks again, Sandy

 

[rmikesmith]

Loomah,

Great Tip! Now, will you remind me of this once a day for a week so it sinks in?

Regards,
Mike

 

[Loomah]

Mike
I'd love to but if I start jamming the site with the same posting someone might complain!!

Get a big piece of paper and a red marker pen and write it down and stick it to your pc!!

Anyway, your request made me smile (actaually I laughed at an inappropriate moment!) so cheers.
:-D If a man says something and there are no women there to hear him, is he still wrong?
"...Three Lions On A Shirt..."

 

[rmikesmith]

sjpistolesi,

If you are still interested, I have created a workbook that displays all sheets in a listbox on a userform (with space for approx. 32 sheet names -- this is adjustable depending on screen size). The user can select one of these and click a button to activate the sheet. If you would like a copy, post back with your email address.

Regards,
M. Smith

 

[sjpistolesi]

M. Smith,

Yes, that would be helpful ... thanks. You can send it to [pistolesi@aol.com].

I appreciate the assistance,
Sandy

 

[sjpistolesi]

M. Smith,

Thanks so very much for your sample! I was able to easily modify it to list the active workbook sheets ... all of them. I know my user will be pleased (and now probably ask for "more" {grin).

Sandy