Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 22,906
Default Worksheet, selection macro

Steve

If you have a lot of sheets you can list them using this macro.

Insert a new sheet then run the macro.

Private Sub ListSheets()
'list of sheet names starting at A1
Dim rng As Range
Dim i As Integer
Set rng = Range("A1")
For Each Sheet In ActiveWorkbook.Sheets
rng.Offset(i, 0).Value = Sheet.Name
i = i + 1
Next Sheet
End Sub

When done, follow Otto's advice.


Gord Dibben MS Excel MVP


On Wed, 1 Nov 2006 16:13:01 -0800, Steve
wrote:

Wicked, thank you very much for your help

"Otto Moehrbach" wrote:

Steve
In some out of the way place on one of the sheets, or create another
sheet (hidden), list all the sheet names. Name that list something like
"ShtNames". Then in the same cell in each sheet, create a Data Validation
cell and choose- List. In source: Type "=ShtNames" without the quotes.
In the sheet module of each of these sheets, copy and paste this macro. I
assumed the Data Validation cell is A1. HTH Otto
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count 1 Then Exit Sub
If IsEmpty(Target.Value) Then Exit Sub
If Target.Address(0, 0) = "A1" Then
Sheets(Target.Value).Activate
Application.EnableEvents = False
Sheets(Target.Value).Range(Target.Address).ClearCo ntents
Application.EnableEvents = True
End If
End Sub
"Steve" wrote in message
...
I knew already about the nav bar at the ottom of the screen. what I am
after
is a drop down list menu that will be actually on each and every worksheet
itself,positions next to a logo I have place at the top of the worksheets.
Thank you anyway for that

"Otto Moehrbach" wrote:

Steve
Excel already has something similar to what you describe. Look at
the
bottom of any sheet and you see the sheet tabs. Look to the left of the
left-most sheet tab. You see 4 left/right arrows with which you can
scroll
the sheet names. Right click inside that group of arrows. This displays
all the sheet names. Click on one and that sheet will become the active
sheet. If you have more sheets that the list can show, the last item in
the
list will be "More sheets". Click on that and you will see all the
sheets
names. HTH Otto
"Steve" wrote in message
...
I need a macro or such like to aid worksheet selection, I intend on
using a
dropdown list box or combo box with 12 or more sheets available on
it.I'd
like to be able to selct the worksheet needed from the control and then
it
goes to that worksheet.







Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
how do I email amacro? leo Excel Worksheet Functions 24 August 9th 06 02:47 PM
Using this Automatic Resizing Macro with Worksheet Change [email protected] Excel Discussion (Misc queries) 0 December 19th 05 03:57 PM
Comparing a list to a Calendar worksheet. PatrickL Excel Worksheet Functions 0 August 25th 05 04:21 PM
Macro to search for and display data in another worksheet Mark H Excel Worksheet Functions 0 June 14th 05 12:40 PM
Executing macro for all worksheet from a different worksheet Biti New Users to Excel 3 December 8th 04 10:05 AM


All times are GMT +1. The time now is 11:30 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"