You would have to create a new window for each sheet in the workbook and
then tile the windows.  I'm not sure that is very practical but if you want
to see what it looks like run this macro:

Sub WindowForEachSheet()
   Dim WS As Worksheet
   For Each WS In Worksheets
       ActiveWindow.NewWindow
       WS.Activate
   Next
   Windows(1).Close
   Windows.Arrange xlArrangeStyleTiled
End Sub

This assumes you have only one window when you run this.

Afshar,

You can use Window / New Window  (34 times!), then use Window / Arrange...   and check Tiled and
"Windows of active workbook" and then click OK, but 35 windows won't offer you much of a view of
each sheet.

HTH,
Bernie
MS Excel MVP

I read your message slightly differently.

I read it as you want to see the names of the worksheets without having to
scroll to the right or left.

You can rightclick on the VCR like (DVD like???) controls to the left of the
worksheet tabs and see a list (or choose More Sheets) and select a worksheet
from there.

Or you could try an addin from Debra Dalgleish's site:
http://contextures.com/xlToolbar01.html