Display Sheet Tabs in Two Rows
Oh, and I also made cell "A1" of each of the other sheets link back to the
index.
"Charlie" wrote:
What I did was make sheet1 be an "Index" sheet and create links to all other
sheets by adding the sheet names and hyperlinks down the cells of column 1
Dim iRow As Long
Dim Sheet As Worksheet
For Each Sheet In ActiveWorkbook.Sheets
If Sheet.Name < "Index" Then
iRow = iRow + 1
Sheets("Index").Hyperlinks.Add _
Anchor:=Sheets("Index").Cells(iRow, 1), _
Address:="", _
SubAddress:="'" & Sheet.Name & "'!A1", _
TextToDisplay:=Sheet.Name
End If
Next Sheet
" wrote:
Hi, I'm using MS Excel 2003 and I've created a workbook with a huge
number of sheets. I need to navigate between sheets frequently.
Is there a way to display the tabs in 2 or 3 rows along the bottom,
instead of constantly scrolling left and right?
The sheet names are already as short as possible and I dragged the
scroll bar to as small a setting as is useful.
Thanks for the help
|