There are some things that might help you with tabs.
Sorting them with a macro (SortAllSheets)
http://www.mvps.org/dmcritchie/excel/buildtoc.htm#sortallsheets
The basic purpose of the buildtoc.htm page is to
Build a Table of Contents.
You can right-click on any of the worksheet navigation arrows to see the
worksheet names -- works better if sheet tabs have been sorted.
If you have a few sheets you will be forces to use "more sheets",
you can use a macro get there immediately.
Sub SheetList_CP()
'Chip Pearson, 2002-10-29, misc., 23ByZYZ3fCHA.1308%40tkmsftngp11
On Error Resume Next
Application.CommandBars("Workbook Tabs").Controls("More Sheets...").Execute
End Sub
More information on worksheets
http://www.mvps.org/dmcritchie/excel/sheets.htm
---
HTH, The searches at the top of my search.htm have been changed
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
"Jack Trexler" <Tre...@eastman.com> wrote in message news:034801c3035c$3e646fb0$3301...@phx.gbl...
sorry for extraneous wording, realised afterwards that horizontal
names arranged one above the other veritcally could show more
sheet tabs in a full screen view. But it is not possible in Excel. and the usual
problem is to show as much of a row as possible so I wouldn't think
it would be viable solution but I think there are packages to do allow
docking to anywhere and probably mutiple layers, for me sorting
worksheet tabipl.
--
HTH, The searches at the top of my search.htm have been changed
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm
"David McRitchie" <dmcri...@msn.com> wrote in message
>You can right-click on any of the worksheet navigation
arrows to see the
>worksheet names -- works better if sheet tabs have been
sorted.
>If you have a few sheets you will be forces to use "more
sheets",
>you can use a macro get there immediately.
>
>Sub SheetList_CP()
> 'Chip Pearson, 2002-10-29, misc., 23ByZYZ3fCHA.1308%
40tkmsftngp11
> On Error Resume Next
> Application.CommandBars("Workbook Tabs").Controls("More
Sheets...").Execute
>End Sub
>
Here is another three method to show sheet activate
dialog. Might be you knew it. Just for your notice.
1. Find control & execute.
Sub moresheets()
CommandBars.FindControl(Type:= _
msoControlButton, ID:=957).Execute
End Sub
2. Run this macro to add control to standard toolbar &
afterword you have to click this button to activate dialog.
Sub AddControl()
'add button to commandbar for sheet activate dialogbox.
Set cnt = CommandBars("Standard").Controls.Add _
(Type:=msoControlButton, before:=1, ID:=957)
End Sub
3. Using sendkeys: More then 16 sheet then show activate
dialogbox else popup sheet name.
Sub SheetActivate()
If Application.CommandBars("workbook tabs").Controls
(16).Caption Like "More Sheets*" Then
Application.SendKeys "{end}~"
Application.CommandBars("workbook tabs").ShowPopup
End Sub
With Regards,
Shah Shailesh
"Shah Shailesh" <shahsh...@hotmail.com> wrote ...