Jeśli skoroszyt programu Excel zawiera wiele arkuszy roboczych, aby uzyskać do nich szybki dostęp, możesz utworzyć listę hiperłączy do wszystkich arkuszy. W tym artykule udostępnimy Ci 3 metody.
Jeśli masz skoroszyt programu Excel, który zawiera dużą liczbę arkuszy, może być kłopotliwe zlokalizowanie i dostęp do żądanego arkusza. W takim przypadku możesz utworzyć listę hiperłączy do wszystkich arkuszy, dzięki czemu możesz przejść do określonego arkusza roboczego, po prostu klikając hiperłącze. To całkiem wygodne. Dlatego tutaj przedstawimy 3 sposoby tworzenia takiej listy.
Metoda 1: Utwórz ręcznie
- Na początek otwórz konkretny skoroszyt programu Excel.
- Następnie wstaw nowy arkusz przed pierwszym arkuszem.
- Następnie kliknij prawym przyciskiem komórkę A1 i wybierz „Hiperłącze” z menu kontekstowego.
- Później, w oknie „Wstaw hiperłącze”, wybierz „Umieść w tym dokumencie” po lewej stronie.
- Następnie z listy „Lub wybierz miejsce w tym dokumencie” wybierz pierwszy arkusz oprócz bieżącego nowego arkusza.
- Następnie zmień „Tekst do wyświetlenia” na nazwę arkusza.
- Na koniec kliknij „OK”, aby wstawić hiperłącze.
- Teraz możesz wstawiać po kolei hiperłącza do pozostałych arkuszy.
Metoda 2: Utwórz za pomocą formuły
- Po pierwsze, utwórz nowy arkusz.
- Następnie wypisz wszystkie nazwy arkuszy roboczych zgodnie z metodą 2 w poście „3 szybkie sposoby uzyskania listy wszystkich nazw arkuszy w skoroszycie programu Excel".
- Później umieść poniższą formułę w komórce C1.
=HYPERLINK("#'"&B1&"'!A1",B1)
- Ostatecznie przeciągnij funkcję w dół, aby uzyskać hiperłącza do innych arkuszy.
Metoda 3: Utwórz za pomocą VBA
- Na początku uruchom edytor Excel VBA, odnosząc się do „Jak uruchomić kod VBA w programie Excel".
- Następnie umieść poniższy kod w projekcie lub module.
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
- Następnie naciśnij „F5”, aby uruchomić to makro.
- Od razu zobaczysz nowy arkusz, który zawiera wszystkie hiperłącza do wszystkich arkuszy, jak na poniższym zrzucie ekranu.
Porównanie
| Zalety | Wady | |
| Metoda 1 | Łatwy w obsłudze | Zbyt uciążliwe, jeśli jest zbyt wiele arkuszy |
| Metoda 2 | Szybciej niż metoda 1 w przypadku wielu arkuszy | Żąda wcześniejszego podania numerów i nazw arkuszy |
| Metoda 3 | Znacznie szybsze i skuteczniejsze niż powyższe 2 metody | Uważaj na zewnętrzne makra, które mogą być złośliwe |
Odzyskaj uszkodzone pliki Excela
Od czasu do czasu program Excel może ulec awarii, co może prowadzić do uszkodzenia pliku Excel. Dlatego musisz być przyzwyczajony do zapisywania pliku za każdym razem, gdy zmieniasz plik Excela. W przeciwnym razie, jeśli program Excel ulegnie awarii, ale nie zapisałeś otwartego pliku, musisz skorzystać z naprawa xls oprogramowanie, takie jak DataNumen Excel Repair, aby odzyskać uszkodzone dane programu Excel.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym odzyskiwanie mdf i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com