3 Metode za kreiranje liste hiperveza do svih radnih listova u Excel radnoj svesci

Kada Excel radna sveska ima mnogo radnih listova, da biste im brzo pristupili, možda ćete želeti da kreirate listu hiperveza do svih radnih listova. U ovom članku ćemo s vama podijeliti 3 metode.

Ako imate Excel radnu knjigu koja sadrži veliku količinu radnih listova, možda će vam biti problematično pronaći željeni radni list i pristupiti njemu. U ovom slučaju, možete kreirati listu hiperveza na sve radne listove, što vam može omogućiti da skočite na određeni radni list jednostavnim klikom na hipervezu. Prilično je zgodno. Stoga ćemo ovdje predstaviti 3 načina za kreiranje takve liste.

Metoda 1: Ručno kreiranje

1. Za početak, otvorite određenu Excel radnu knjigu.
2. Zatim umetnite novi list prije prvog radnog lista.
3. Zatim kliknite desnim tasterom miša na ćeliju A1 i izaberite "Hyperlink" iz kontekstnog menija.
4. Kasnije, u prozoru “Insert Hyperlink” odaberite “Place in This Document” na lijevoj strani.
5. Nakon toga, na listi "Ili izaberite mjesto u ovom dokumentu" odaberite prvi list osim trenutnog novog lista.
6. Zatim promijenite "Tekst za prikaz" u naziv lista.
7. Na kraju, kliknite na “OK” da biste umetnuli hipervezu.
8. Sada možete jedan po jedan umetnuti hiperveze na preostale listove.

Metoda 2: Kreirajte putem formule

1. Prvo kreirajte novi list.
2. Zatim, navedite sva imena radnih listova prema Metodi 2 u objavi "3 brza načina da dobijete listu svih naziva radnih listova u Excel radnoj svesci".
3. Kasnije stavite formulu ispod u ćeliju C1.

=HYPERLINK("#'"&B1&"'!A1",B1)

4. Na kraju, povucite funkciju prema dolje da biste dobili hiperveze do drugih listova.

Metod 3: Kreirajte pomoću VBA

1. Na početku pokrenite Excel VBA editor pozivajući se na “Kako pokrenuti VBA kod u vašem Excelu".
2. Zatim stavite kod ispod u projekat ili modul.

Sub CreateMenuOfHyperlinksToAllWorksheets()
    Dim objSheet As Worksheet

    ActiveWorkbook.Sheets.Add(Before:=Worksheets(1)).Name = "Sheet Menu"
    Range("A1").Select

    For Each objSheet In ActiveWorkbook.Worksheets
        If ActiveSheet.Name <> objSheet.Name Then
           ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= "'" & objSheet.Name & "'" & "!A1", TextToDisplay:=objSheet.Name
           ActiveCell.Offset(1, 0).Select
           ActiveCell.EntireColumn.AutoFit
        End If
    Next objSheet

    With ActiveSheet
         .Rows(1).Insert
         .Cells(1, 1) = "MENU"
         .Cells(1, 1).Font.Bold = True
         .Cells(1, 1).Font.Size = 14
         .Cells(1, 1).Columns.AutoFit
    End With
End Sub

3. Zatim pritisnite “F5” da pokrenete ovaj makro.
4. Odjednom ćete vidjeti novi radni list, koji sadrži sve hiperveze do svih radnih listova, kao na sljedećem snimku ekrana.

poređenje

Oporavak oštećenih Excel datoteka

Excel se s vremena na vrijeme može srušiti, što može dovesti do oštećenja Excel datoteke. Stoga morate biti naviknuti na spremanje datoteke svaki put kada mijenjate Excel datoteku. U suprotnom, ako se Excel sruši, ali niste sačuvali otvorenu datoteku, morate pribjeći xls fix softver, kao npr DataNumen Excel Repair, da vratite oštećene Excel podatke.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući mdf recovery i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com