Excel жұмыс кітабындағы барлық жұмыс парақтарына гипер сілтемелер тізімін жасаудың 3 әдісі

Excel шешімдері Қазан 3, 2025

Excel жұмыс кітабында көптеген жұмыс парақтары болған кезде, оларға жылдам қол жеткізу үшін барлық парақтарға сілтемелер тізімін жасау қажет болуы мүмкін. Бұл мақалада біз сіздермен 3 әдісті бөлісеміз.

Егер сізде жұмыс парақтарының көп мөлшері бар Excel жұмыс кітабы болса, қажетті парақты табу және оған кіру қиын болуы мүмкін. Бұл жағдайда сіз барлық жұмыс парақтарына еренсілтемелер тізімін құра аласыз, бұл сізге нақты жұмыс парағына гипершилтемені басу арқылы өтуге мүмкіндік береді. Бұл өте ыңғайлы. Осылайша, біз осындай тізімді құрудың 3 әдісін таныстырамыз.

1-әдіс: Қолмен жасау

Бастау үшін, арнайы Excel жұмыс кітабын ашыңыз.
Содан кейін, бірінші парақтың алдында жаңа парақты салыңыз.
Содан кейін A1 ұяшығын тінтуірдің оң жағымен басып, мәтінмәндік мәзірден «Гиперсілтеме» таңдаңыз.
Кейінірек, «Гиперсілтеме кірістіру» терезесінде, сол жақта «Осы құжатқа орналастыру» тармағын таңдаңыз.
Осыдан кейін, «Немесе осы құжаттағы орынды таңдаңыз» тізімінде ағымдағы жаңа парақтан басқа бірінші парақты таңдаңыз.
Содан кейін парақтың атына «Көрсетілетін мәтінді» өзгертіңіз.
Соңында еренсілтемені енгізу үшін «OK» батырмасын басыңыз.
Енді сіз сілтемелерді қалған парақтарға бір-бірлеп кірістіре аласыз.

2-әдіс: Формула арқылы құру

Алдымен жаңа парақ жасаңыз.
Содан кейін, «2-әдіс» жазбасындағы барлық жұмыс парағының атауларын тізімдеңіз.Excel жұмыс кітабындағы барлық жұмыс парақтарының тізімін алудың 3 жылдам әдісі«.
Кейінірек төмендегі формуланы C1 ұяшығына салыңыз.

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

Соңында, басқа парақтарға сілтемелерді алу үшін функцияны төмен сүйреңіз.

3-әдіс: VBA көмегімен жасаңыз

Бастапқыда Excel VBA редакторын «сілтеме жасай отырып іске қосыңыз.Excel бағдарламасында VBA кодын қалай іске қосуға болады«.
Содан кейін, төмендегі кодты жобаға немесе модульге салыңыз.

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

Осы макросты іске қосу үшін «F5» пернесін басыңыз.
Бірден сіз келесі жұмыс скриншоты сияқты барлық парақтарға барлық сілтемелерді қамтитын жаңа жұмыс парағын көресіз.

салыстыру

	артықшылықтары	кемшіліктері
1 әдісі	Оңай жұмыс істеу	Егер жұмыс парақтары тым көп болса, өте жалықтырады
2 әдісі	Бірнеше жұмыс парағында 1-әдіске қарағанда жылдам	Алдын ала нөмірлер мен парақ атауларын тізімдеуді талап етеді
3 әдісі	Жоғарыда аталған 2 әдіске қарағанда әлдеқайда жылдам және тиімді	Зиянды болуы мүмкін сыртқы макростарды сақтаңыз

Бүлінген Excel файлдарын қалпына келтіріңіз

Excel бағдарламасы кейде бұзылуы мүмкін, бұл Excel файлының бүлінуіне әкелуі мүмкін. Демек, Excel файлын ауыстырған кезде файлды сақтауға дағдылануыңыз керек. Әйтпесе, егер Excel жұмыс істемей қалса, бірақ сіз ашылған файлды сақтамаған болсаңыз, сізге жүгінуіңіз керек xls түзету сияқты бағдарламалық жасақтама DataNumen Excel Repair, зақымдалған Excel деректерін қайтару үшін.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. mdf қалпына келтіру және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com