Tabsheet names

[T. Cauwe]

Dear,

I would like to generate an array with all the tabsheet names of that particular workbook. I've found several ways to do so for the active tabsheet, but would want to do it in a less manual way for all of them regardless of the amount of tabsheets. Let's assume I would have 1 tabsheet named summary onto where I want to have all the tabsheet names generated.

See example,

T.Cauwe

 

[kchiba]

Hi,

Change the macro below to suit

Sub getsheetnames()

x = 0
For Each Sheet In Worksheets
x = x + 1
y = Sheet.Name
Sheets("sheet1").Range("A" & x) = y
Next
End Sub

 

[GFC]

You may also be interested by:
http://www.excelforum.com/tips-and-tutorials/929969-list-worksheet-names-using-a-formula.html

 

[SirJB7]

@GFC
Hi!
Almost never a post of your own? Strange, at least... more strange indeed when almost all from other websites... That's politeness, isn't it?
Regards!