Excel İş Kitabında Bütün İş Vərəqlərinə Hiperlinklərin Siyahısını Yaratmaq üçün 3 Metod

Excel iş kitabında çoxlu iş vərəqləri olduqda, onlara tez daxil olmaq üçün siz bütün iş vərəqlərinə hiperlinklərin siyahısını yaratmaq istəyə bilərsiniz. Bu yazıda 3 üsulu sizinlə paylaşacağıq.

Çox sayda iş vərəqindən ibarət Excel iş kitabınız varsa, istədiyiniz iş vərəqini tapmaq və əldə etmək sizə çətin ola bilər. Bu halda, siz bütün iş vərəqlərinə hiperlinklərin siyahısını yarada bilərsiniz ki, bu da sadəcə hiperlinkə klikləməklə müəyyən bir iş vərəqinə keçməyə imkan verə bilər. Bu olduqca rahatdır. Beləliklə, burada belə bir siyahı yaratmağın 3 yolunu təqdim edəcəyik.

Metod 1: Əllə Yaradın

1. Başlamaq üçün müəyyən bir Excel iş kitabını açın.
2. Sonra, ilk iş vərəqindən əvvəl yeni vərəq daxil edin.
3. Sonra, A1 xanasına sağ vurun və kontekst menyusundan "Hiperlink" seçin.
4. Daha sonra "Hiperlink daxil et" pəncərəsində sol tərəfdə "Bu sənəddə yerləşdir" seçin.
5. Bundan sonra, "Və ya bu sənəddə bir yer seçin" siyahısında cari yeni vərəqdən başqa birinci vərəqi seçin.
6. Sonra “Göstəriləcək mətn”i vərəq adına dəyişin.
7. Nəhayət, hiperlink daxil etmək üçün "OK" düyməsini basın.
8. İndi siz qalan vərəqlərə hiperlinkləri bir-bir əlavə edə bilərsiniz.

Metod 2: Formula vasitəsilə yaradın

1. Əvvəlcə yeni vərəq yaradın.
2. Daha sonra, "Metod 2" yazısındakı bütün iş vərəqlərinin adlarını sadalayın.Excel iş kitabında bütün iş vərəqlərinin adlarının siyahısını əldə etməyin 3 sürətli yolu".
3. Daha sonra aşağıdakı düsturu C1 xanasına qoyun.

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

4. Nəhayət, digər vərəqlərə keçidləri əldə etmək üçün funksiyanı aşağı çəkin.

Metod 3: VBA ilə yaradın

1. Əvvəlcə “Excel VBA redaktorunu işə salın”Excel-də VBA kodunu necə işlətmək olar".
2. Sonra, aşağıdakı kodu layihə və ya modula qoyun.

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. Sonra, bu makronu işə salmaq üçün "F5" düyməsini basın.
4. Bir anda, aşağıdakı ekran görüntüsü kimi bütün iş vərəqlərinə bütün hiperlinkləri ehtiva edən yeni iş vərəqini görəcəksiniz.

Müqayisə

Zədələnmiş Excel fayllarını bərpa edin

Excel vaxtaşırı çökə bilər ki, bu da Excel faylının pozulmasına səbəb ola bilər. Beləliklə, Excel faylını hər dəfə dəyişdirərkən faylı saxlamağa vərdiş etməlisiniz. Əks halda, Excel qəzaya uğrayarsa, lakin siz açılmış faylı saxlamamısınızsa, aşağıdakılara müraciət etməlisiniz. xls düzəldin kimi proqram təminatı DataNumen Excel Repair, zədələnmiş Excel məlumatlarını geri qaytarmaq üçün.

Müəllif Giriş:

Shirley Zhang məlumatların bərpası üzrə mütəxəssisdir DataNumendaxil olmaqla məlumatların bərpası texnologiyaları üzrə dünya lideri olan , Inc mdf bərpası və Outlook təmiri proqram məhsulları. Ətraflı məlumat üçün ziyarət edin www.datanumen.com