ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   Get all sheets names in one sheet (https://www.excelbanter.com/excel-worksheet-functions/257074-get-all-sheets-names-one-sheet.html)

Need Macro::Consolidating 500 sheets in

Get all sheets names in one sheet
 
1.I have 50 Sheets naming with employee names. Is there any option to get all
Sheet names in one sheet.
2.And can i give link between them, means if i change the name in the sheet,
can it be changed in the sheet name also.

Kindly help me in this?

Eduardo

Get all sheets names in one sheet
 
Hi,
you can get it with a macro

'list of sheet names starting at A1 on new sheet
Sub Sheet_Names()
Dim ws As Worksheet
With Worksheets.Add
.Name = "Sheet Names"
.Move befo=Worksheets(1)
End With
Sheets("Sheet Names").Activate
Range("a1").Activate
For Each ws In Worksheets
If ws.Name < "Sheet Names" Then
ActiveCell.Formula = ws.Name
ActiveCell.Offset(1, 0).Select
End If
Next

End Sub



"Need Macro::Consolidating 500 sheets in" wrote:

1.I have 50 Sheets naming with employee names. Is there any option to get all
Sheet names in one sheet.
2.And can i give link between them, means if i change the name in the sheet,
can it be changed in the sheet name also.

Kindly help me in this?



All times are GMT +1. The time now is 04:41 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com