Jak utworzyć listę rozwijaną z hiperłączami do każdego arkusza w programie Excel?
Być może wcześniej utworzyłeś listę rozwijaną, ale czy kiedykolwiek utworzyłeś listę rozwijaną z hiperłączami do każdego arkusza w programie Excel, jak pokazano na poniższym zrzucie ekranu?
Utwórz listę rozwijaną z hiperłączami do arkuszy
Utwórz listę arkuszy z hiperłączami
Utwórz listę rozwijaną z hiperłączem do arkusza
Jest tylko kod VBA, który może obsłużyć zadanie w programie Excel.
1. kliknij Deweloper > wstawka > Pole kombi (formanty ActiveX).
Uwaga: Jeśli karta programisty nie jest wyświetlana na Wstążce, kliknij filet > Opcje > Dostosuj Wstążkę, a następnie sprawdź Deweloper opcja w prawym polu. Zobacz zrzut ekranu:
2. Następnie narysuj Combo Box w dowolnym miejscu.
3. Kliknij prawym przyciskiem myszy arkusz, który właśnie narysowałeś Combo Box, i kliknij Wyświetl kod z menu kontekstowego.
4. Skopiuj i wklej poniższy kod do pustego skryptu, a następnie zapisz go, aby wrócić do arkusza.
VBA: Utwórz rozwijaną listę z linkami do arkuszy
Private Sub ComboBox1_Change()
'UpdatebyExtendoffice20180404
Sheets(Me.ComboBox1.Text).Select
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
Me.ComboBox1.Style = fmStyleDropDownList
If Me.ComboBox1.ListCount <> Sheets.Count Then
Me.ComboBox1.Clear
For I = 1 To ActiveWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
End If
Me.ComboBox1.DropDown
End Sub
5. kliknij Deweloper > Tryb projektowania aby wyjść z trybu projektowania.
Teraz wszystkie arkusze zostały wymienione na liście rozwijanej i zostanie ona przeniesiona do arkusza po kliknięciu nazwy arkusza.
Utwórz listę arkuszy z hiperłączami
Jeśli chcesz po prostu utworzyć listę klikalnych nazw arkuszy, jak pokazano na zrzucie ekranu, możesz złożyć wniosek Kutools for Excel'S Create List of Sheet Names funkcja, która może utworzyć listę hiperłączy do nazw arkuszy lub listę przycisków makr dotyczących nazw arkuszy.
Kutools dla programu Excel, ponad 300 przydatne funkcje, ułatwiają pracę. |
Po zainstalowaniu Kutools dla programu Excel, wykonaj poniższe czynności:(Bezpłatne pobieranie Kutools dla programu Excel teraz!)
1. kliknij Kutools Plus > Ćwiczenie > Create List of Sheet Names.
2. w Create List of Sheet Names okno dialogowe, wykonaj poniższe czynności:
(1). Sprawdzać Contains a list of hyperlinks< , aby utworzyć listę klikalnych nazw arkuszy, lub zaznacz Contains buttons and macros aby utworzyć przyciski prowadzące do poszczególnych arkuszy.
(2). Podaj nowy arkusz, w którym umieścisz hiperłącza w nazwie.
(3). Określ położenie nowego arkusza.
(4). Określ liczbę wyświetlanych łączy arkuszy w liczbie kolumn.
3. kliknij OK, teraz klikalne nazwy arkuszy zostały wyświetlone w nowym arkuszu.
Demo
Najlepsze narzędzia biurowe
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...
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!