View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bruno Campanini[_3_] Bruno Campanini[_3_] is offline
external usenet poster
 
Posts: 52
Default Macro to go quickly to a sheet

"Darin Kramer" wrote in message
...

Hi there,


I have about 40 sheets in a book. I need to quickly navigate to a sheet
by being able to enter the sheet name and then i want Excel to take me
to that sheet.
(i dont want to create a long list of hyperlinked names - would rather
run a macro that asks me what sheet I want to goto and takes me there...
or perhaps gotospecial command...?

Any ideas...


Try this code:
--------------------------------
Sub Button10_Click()
Dim SheetName As String

SheetName = InputBox("Sheet to be activated")
If SheetName = "" Then
Exit Sub
Else
ThisWorkbook.Sheets(SheetName).Activate
End If

End Sub
---------------------------

Bruno