![]() |
Is there a way to make a link to a specific tab in excel?
Is there a way to make a link to a specific tab in excel? I have a workbook
with many tabs and I want to make an first page that has links to go to specific tab when clicked. |
Is there a way to make a link to a specific tab in excel?
Pick a cell on the first page and right click - hyperlink - "place in this
document" and you will see a list of sheet names. your done. Does that work? Mike "Carlee" wrote: Is there a way to make a link to a specific tab in excel? I have a workbook with many tabs and I want to make an first page that has links to go to specific tab when clicked. |
Is there a way to make a link to a specific tab in excel?
Maybe you could use David McRitchie's Build Table of Contents to get the list
and the hyperlinks all at once: http://www.mvps.org/dmcritchie/excel/buildtoc.htm Another option if you want a more generic solution: http://contextures.com/xlToolbar01.html (From Debra Dalgleish's site.) It builds a toolbar that you can use with any workbook to navigate to any worksheet. Carlee wrote: Is there a way to make a link to a specific tab in excel? I have a workbook with many tabs and I want to make an first page that has links to go to specific tab when clicked. -- Dave Peterson |
Is there a way to make a link to a specific tab in excel?
Say we start with Book1.xls and Sheet1.
In A1 enter: =HYPERLINK("#Sheet2!A1","sheet2") This will create a "jump-able" link to Sheet2. BY THE WAY to jump back just use ALT-BACKARROW -- Gary''s Student - gsnu200718 |
Is there a way to make a link to a specific tab in excel?
I use this in a menu workbook to goto a sheet or workbook if the name typed
in a cell. Right click sheet tabview codeinsert thistype in the name(s) of your sheets or use 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(ActiveCell.Value) Is Nothing Then GetWorkbook ' calls another macro to do that Else Application.Goto Sheets(ActiveCell.Value).Range("a4") End If Application.DisplayAlerts = True End Sub Sub listsheets() For i = 1 To Worksheets.Count Cells(i, "a") = Sheets(i).Name Next i End Sub -- Don Guillett SalesAid Software "Carlee" wrote in message ... Is there a way to make a link to a specific tab in excel? I have a workbook with many tabs and I want to make an first page that has links to go to specific tab when clicked. |
Is there a way to make a link to a specific tab in excel?
Carlee
Can be done using hyperlinks but............... How will you you get back to the sheet you came from? I like Bob Phillips BrowseSheets macro which pops up a list of sheets to select from. Sub BrowseSheets() Const nPerColumn As Long = 38 'number of items per column Const nWidth As Long = 13 'width of each letter Const nHeight As Long = 18 'height of each row Const sID As String = "___SheetGoto" 'name of dialog sheet Const kCaption As String = " Select sheet to goto" 'dialog caption Dim i As Long Dim TopPos As Long Dim iBooks As Long Dim cCols As Long Dim cLetters As Long Dim cMaxLetters As Long Dim cLeft As Long Dim thisDlg As DialogSheet Dim CurrentSheet As Worksheet Dim cb As OptionButton Application.ScreenUpdating = False If ActiveWorkbook.ProtectStructure Then MsgBox "Workbook is protected.", vbCritical Exit Sub End If On Error Resume Next Application.DisplayAlerts = False ActiveWorkbook.DialogSheets(sID).Delete Application.DisplayAlerts = True On Error GoTo 0 Set CurrentSheet = ActiveSheet Set thisDlg = ActiveWorkbook.DialogSheets.Add With thisDlg .Name = sID .Visible = xlSheetHidden 'sets variables for positioning on dialog iBooks = 0 cCols = 0 cMaxLetters = 0 cLeft = 78 TopPos = 40 For i = 1 To ActiveWorkbook.Worksheets.Count If i Mod nPerColumn = 1 Then cCols = cCols + 1 TopPos = 40 cLeft = cLeft + (cMaxLetters * nWidth) cMaxLetters = 0 End If Set CurrentSheet = ActiveWorkbook.Worksheets(i) cLetters = Len(CurrentSheet.Name) If cLetters cMaxLetters Then cMaxLetters = cLetters End If iBooks = iBooks + 1 .OptionButtons.Add cLeft, TopPos, cLetters * nWidth, 16.5 .OptionButtons(iBooks).text = _ ActiveWorkbook.Worksheets(iBooks).Name TopPos = TopPos + 13 Next i .Buttons.Left = cLeft + (cMaxLetters * nWidth) + 24 CurrentSheet.Activate With .DialogFrame .Height = Application.Max(68, _ Application.Min(iBooks, nPerColumn) * nHeight + 10) .Width = cLeft + (cMaxLetters * nWidth) + 24 .Caption = kCaption End With .Buttons("Button 2").BringToFront .Buttons("Button 3").BringToFront Application.ScreenUpdating = True If .Show Then For Each cb In thisDlg.OptionButtons If cb.Value = xlOn Then ActiveWorkbook.Worksheets(cb.Caption).Select Exit For End If Next cb Else MsgBox "Nothing selected" End If Application.DisplayAlerts = False .Delete End With End Sub Gord Dibben MS Excel MVP On Fri, 27 Apr 2007 06:12:03 -0700, Carlee wrote: Is there a way to make a link to a specific tab in excel? I have a workbook with many tabs and I want to make an first page that has links to go to specific tab when clicked. |
Is there a way to make a link to a specific tab in excel?
Hi all,
I know this is an old post, but I if I can't find a solution, I may need to try some of these answers in a work around. I was hoping by posting here that you all may see my post. Please have a look and let me know if you have a solution. Thanks. http://www.microsoft.com/communities...=en-us&m=1&p=1 "Carlee" wrote: Is there a way to make a link to a specific tab in excel? I have a workbook with many tabs and I want to make an first page that has links to go to specific tab when clicked. |
All times are GMT +1. The time now is 03:06 PM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com