lists

[MAMIBUSSOL]

Hi

In my workbook I have a series of Sheets

Sheet1 (S JAN 1)
Sheet2 (P JAN 1)
Sheet3 (S FEB 1)
Sheet4 (P FEB 1)

Etc

I want to generate a list of sheetnames from a workbook

any ideas how to accomplish

 

[Trevor G]

Try this:

Sub SheetNames()
Columns(1).Insert
For i = 1 To Sheets.Count
Cells(i, 1) = Sheets(i).Name
Next i
End Sub

 

[mikerickson]

Dim i As Long

With ThisWorkbook
    For i = 1 to .Sheets.Count
        Cells(i, 1).Value = .Sheets(i).Name
    Next i
End With

 

[MAMIBUSSOL]

excel stores the sheet number and name is it possible to get the sheet number in 1 column and the name of the sheet in a 2nd column

column a columnb
sheet? value

 

[mikerickson]

What modification of my code have you tried?

 

[MAMIBUSSOL]

this piece of code deals with the displaying of the name

Cells(i, 1).Value = .Sheets(i).Name

what I don't know is how to get the .Sheets section to display, I tried

Cells(i, 1).Value = .Sheets(i).Value

I guess I can't figure out what goes on the underlined part of code

 

[mikerickson]

Notice that the variable i is the index of the sheet (which you want in column 1)
and Sheet(i).Name is the name of the sheet (which you want in column 2)