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
|