hi.


i have a code which i need to ammend.
I need to only list sheet names in between sheets named "start" &
"End".
I need the list to start in cell a22 on sheet "apples"



Sub listsheets()
For i = 1 To Worksheets.Count
Cells(i, "a") = Sheets(i).Name
Next i
End Sub



thanx