macro to select worksheet

[kalpesh]

Hello

my workbook contain many workshee

i want to create a macro in sheet1 to select other workshee

e.g

when click command button go to the worksheet

how possible it

 

[isabelle]

hi,

you can use a hyperlink


Sub Macro1()
For i = 2 To Sheets.Count
Sheets(1).Hyperlinks.Add Anchor:=Range("A" & i), _
Address:="", SubAddress:=Sheets(i).Name & "!A1", TextToDisplay:=Sheets(i).Name & "!A1"
Next
End Sub



--
isabelle



Le 2012-02-15 12:01, kalpesh a écrit :

 

[Gord Dibben]

Right-click on the navigation arrows at bottom left to get a list of
15 sheets and "more sheets".


Rather than hyperlinks, try a sheet navigation toolbar or similar.


Sheet navigation bar from by Dave Peterson at Debra Dalgleish's site.


http://www.contextures.on.ca/xlToolbar01.html


Or Bob Phillips' Browsesheets macro.


See this google search result.


http://tinyurl.com/yoa3dw



Gord

 

[Don Guillett]

or one I have used from a name of the sheet in a cell. You can do a
macro to list the sheets, if desired.
'
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Application.DisplayAlerts = False
Dim WantedSheet As String
WantedSheet = Trim(ActiveCell.Value)
If WantedSheet = "" Then Exit Sub
On Error Resume Next
If Sheets(WantedSheet) Is Nothing Then
GetWorkbook ' calls another macro to do that
Else
Application.GoTo Sheets(WantedSheet).Range("a4")
End If
Application.DisplayAlerts = True
End Sub