Когато работна книга на Excel има много работни листове, за да имате бърз достъп до тях, може да искате да създадете списък с хипервръзки към всички работни листове. В тази статия ще споделим 3 метода с вас.
Ако имате работна книга на Excel, която съдържа голямо количество работни листове, може да ви е трудно да намерите и получите достъп до желания работен лист. В този случай можете да създадете списък с хипервръзки към всички работни листове, които могат да ви позволят да преминете към конкретен работен лист, просто като щракнете върху хипервръзка. Това е доста удобно. По този начин тук ще представим 3 начина за създаване на такъв списък.
Метод 1: Създайте ръчно
- За катоtart, отворете конкретната работна книга на Excel.
- След това поставете нов лист преди първия работен лист.
- След това щракнете с десния бутон върху клетка A1 и изберете „Hyperlink“ от контекстното меню.
- По-късно в прозореца „Вмъкване на хипервръзка“ изберете „Поставяне в този документ“ от лявата страна.
- След това, в списъка на „Или изберете място в този документ“, изберете първия лист, с изключение на текущия нов лист.
- След това променете „Текст за показване“ на името на листа.
- Накрая щракнете върху „OK“, за да вмъкнете хипервръзката.
- Сега можете да вмъквате хипервръзките към останалите листове един по един.
Метод 2: Създаване чрез формула
- Първо, създайте нов лист.
- След това избройте всички имена на работни листове съгласно Метод 2 в стрost "3 бързи начина за получаване на списък с всички имена на работни листове в работна книга на Excel".
- По-късно сложете формулата по-долу в клетка C1.
= HYPERLINK ("# '" & B1 & "'! A1", B1)
- В крайна сметка плъзнете функцията надолу, за да получите хипервръзките към останалите листове.
Метод 3: Създайте с VBA
- В самото начало стартирайте редактора на Excel VBA, като се обърнете към „Как да стартирате VBA код във вашия Excel".
- След това поставете кода по-долу в проект или модул.
Sub CreateMenuOfHyperlinksToAllWorksheets () Dim objSheet As Worksheet ActiveWorkbook.Sheets.Add (Before: = Worksheets (1)). Name = "Sheet Menu" Range ("A1"). Изберете за всеки objSheet в ActiveWorkbook.Worksheets If ActiveSheet.Name <> objSheet.Name Тогава ActiveCell.Hyperlinks.Add Anchor: = Selection, Address: = "", SubAddress: = "'" & objSheet.Name & "'" & "! A1", TextToDisplay: = objSheet.Name ActiveCell.Offset ( 1, 0) .Изберете 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. Клетки (1, 1). Колони. AutoFit End With End Sub
- След това натиснете „F5“, за да стартирате този макрос.
- Веднага ще видите нов работен лист, който съдържа всички хипервръзки към всички работни листове, като следващата екранна снимка.
сравнение
| Предимства | Недостатъци | |
| Метод 1 | Лесен за работа | Твърде досадно, ако има твърде много работни листове |
| Метод 2 | По-бърз от метод 1 в случай на множество работни листове | Изисква предварително да посочите номера и имена на листове |
| Метод 3 | Много по-бързо и по-ефективно от горните 2 метода | Внимавайте с външни макроси, които може да са злонамерени |
Възстановяване на повредени файлове в Excel
Excel може да се срива от време на време, което може да доведе до повреда на файлове в Excel. Следователно трябва да сте свикнали да записвате файла всеки път, когато сменяте файл на Excel. В противен случай, ако Excel се срине, но не сте запазили отворения файл, трябва да прибегнете до xls поправяне софтуер, като например DataNumen Excel Repair, за да получите обратно повредени данни на Excel.
Въведение на автора:
Шърли Джанг е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително mdf възстановяване и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com