list all sheet names between sheet x and sheet y

  • Thread starter Thread starter J.W. Aldridge
  • Start date Start date
Replace the "x" and "y" in the below with the start and end sheet names

For intTemp = Sheets("X").index to Sheets("Y").index
Range("A" & 43+intTemp) = Sheets(intTemp).Name
Next intTemp

If this post helps click Yes
 
The way you set the limits for intTemp, the odds are great that the list
won't start in cell A44 as the OP requested. This way should work...

Start = Sheets("X").Index
Finish = Sheets("Y").Index
For intTemp = Start To Finish
Cells(44 + intTemp - Start, "A").Value = Sheets(intTemp).Name
Next
 
If you really expect to get help on a problem you are having, you simply
have to provide useful feedback. "Didn't work" gives us no clue what the
problem is (did the code not run, did it run but put the wrong information
in the cells, did it make your computer blowup, etc.), so it is kind of hard
to figure out what advice to give you next. In the future, don't say "didn't
work", tell us what happened that you didn't want to happen.
 
For intTemp = Sheets("X").index to Sheets("Y").index
Sheets("A").Range("A" & 43+intTemp) = Sheets(intTemp).Name
Next intTemp

If this post helps click Yes
 
Thanx Mr. Jacob!
Worked purfetly!

Noted Mr. Rick
(I kinda thought since it seemed so simple no additional info was
needed)
Thanx anyhow.
 
Back
Top