Przejdź do głównej zawartości

Jak utworzyć spis treści dla wszystkich nazw kart arkuszy kalkulacyjnych z hiperłączami w programie Excel?

Skoroszyt programu Excel staje się dość duży, ponieważ w nim tworzonych jest coraz więcej arkuszy. Im więcej arkuszy jest dostępnych, tym trudniej jest zachować przegląd arkuszy. Dlatego do szybkiego poruszania się po arkuszach w programie Excel potrzebny jest spis treści. Ten artykuł pokaże Ci metody osiągnięcia tego celu.

Utwórz spis treści według kodu VBA
Z łatwością utwórz spis treści przez Kutools for Excel


Utwórz spis treści według kodu VBA

Poniższy kod VBA może pomóc w utworzeniu spisu treści dla wszystkich arkuszy z hiperłączami w programie Excel. Wykonaj następujące czynności.

1. wciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł, a następnie skopiuj poniższy kod VBA do okna Code.

Kod VBA: utwórz spis treści dla wszystkich arkuszy

Sub CreateTableofcontents()
'updateby Extendoffice 20180413
    Dim xAlerts As Boolean
    Dim I  As Long
    Dim xShtIndex As Worksheet
    Dim xSht As Variant
    xAlerts = Application.DisplayAlerts
    Application.DisplayAlerts = False
    On Error Resume Next
    Sheets("Table of contents").Delete
    On Error GoTo 0
    Set xShtIndex = Sheets.Add(Sheets(1))
    xShtIndex.Name = "Table of contents"
    I = 1
    Cells(1, 1).Value = "Table of contents"
    For Each xSht In ThisWorkbook.Sheets
        If xSht.Name <> "Table of contents" Then
            I = I + 1
            xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
        End If
    Next
    Application.DisplayAlerts = xAlerts
End Sub

3. wciśnij F5 lub kliknij przycisk Uruchom, aby uruchomić kod.

Następnie przed wszystkimi arkuszami roboczymi tworzony jest spis treści ze wszystkimi nazwami arkuszy wymienionymi w środku. Możesz przejść do dowolnego arkusza roboczego, klikając nazwę arkusza w spisie treści. Zobacz zrzut ekranu:


Z łatwością utwórz spis treści przez Kutools for Excel

Połączenia Utwórz listę nazw arkuszy użyteczność Kutools dla programu Excel może pomóc w szybkim utworzeniu spisu treści w bieżącym skoroszycie. Wykonaj następujące czynności.

Przed złożeniem wniosku Kutools dla programu ExcelProszę pobierz i zainstaluj najpierw.

1. W skoroszycie musisz utworzyć spis treści, kliknij Kutools Plus > Ćwiczenie > Utwórz listę nazw arkuszy. Zobacz zrzut ekranu:

2. w Utwórz listę nazw arkuszy w oknie dialogowym, musisz:

2.1 Wybierz plik Zawiera listę hiperłączy opcja w Styl indeksu arkusza Sekcja;
2.2 Wejdź Spis treści Określ nazwę arkusza dla indeksu arkuszy pole tekstowe;
2.3 Zachowaj domyślne opcje we Wstaw plik Indeks arkusza w formacie i Wyświetlanie indeksu arkusza w formacie listy rozwijane;
2.4 Kliknij OK przycisk. Zobacz zrzut ekranu:

Następnie tworzony jest arkusz roboczy ze spisem treści, jak pokazano poniżej. Możesz przejść do dowolnego arkusza roboczego, klikając nazwę arkusza w spisie treści.

Jeśli wybierzesz opcję Zawiera przyciski i makra w sekcji Wybierz style indeksu, otrzymasz spis treści, jak pokazano poniżej.

  Jeśli chcesz mieć bezpłatną wersję próbną (30 dni) tego narzędzia, kliknij, aby go pobrać, a następnie przejdź do wykonania operacji zgodnie z powyższymi krokami.


Podobne artykuły:

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas.  Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...

Opis


Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę

  • Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
  • Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
  • Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations