Kun Excel-työkirjassa on useita laskentataulukoita, sinun on ehkä luotava luettelo hyperlinkeistä kaikkiin laskentataulukoihin, jotta niitä voidaan käyttää nopeasti. Tässä artikkelissa jaamme 3 menetelmää kanssasi.
Jos sinulla on Excel-työkirja, joka sisältää suuren määrän laskentataulukoita, voi olla hankalaa löytää haluamasi laskentataulukko ja käyttää sitä. Tässä tapauksessa voit luoda luettelon hyperlinkeistä kaikkiin laskentataulukoihin, jolloin voit siirtyä tiettyyn laskentataulukkoon napsauttamalla hyperlinkkiä. Se on melko kätevää. Täten tässä esitellään 3 tapaa luoda tällainen luettelo.
Tapa 1: Luo manuaalisesti
- Aloita avaamalla kyseinen Excel-työkirja.
- Lisää sitten uusi taulukko ennen ensimmäistä laskentataulukkoa.
- Napsauta sitten hiiren kakkospainikkeella Solua A1 ja valitse pikavalikosta Hyperlinkki.
- Myöhemmin "Lisää hyperlinkki" -ikkunassa valitse vasemmalla puolella "Aseta tähän asiakirjaan".
- Tämän jälkeen valitse "Tai valitse paikka tässä asiakirjassa" -luettelosta ensimmäinen arkki lukuun ottamatta nykyistä uutta taulukkoa.
- Muuta sitten "Näytettävä teksti" arkin nimeksi.
- Napsauta lopuksi "OK" lisätäksesi hyperlinkin.
- Nyt voit lisätä hyperlinkit jäljellä oleviin taulukoihin yksitellen.
Tapa 2: Luo kaavan kautta
- Luo ensin uusi arkki.
- Listaa sitten kaikkien laskentataulukoiden nimet menetelmän 2 mukaisesti viestissä ”3 nopeaa tapaa saada luettelo kaikista laskentataulukoiden nimistä Excel-työkirjassa".
- Laita myöhemmin seuraava kaava soluun C1.
=HYPERLINK("#'"&B1&"'!A1",B1)
- Vedä lopulta toiminto alaspäin saadaksesi hyperlinkit muihin taulukoihin.
Tapa 3: Luo VBA: lla
- Käynnistä alussa Excel VBA -editori viittaamallaKuinka suorittaa VBA-koodi Excelissä".
- Laita sitten alla oleva koodi projektiin tai moduuliin.
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
- Suorita tämä makro painamalla seuraavaksi “F5”.
- Näet heti uuden laskentataulukon, joka sisältää kaikki hyperlinkit kaikkiin laskentataulukoihin, kuten seuraava kuvakaappaus.
Vertailu
| edut | Haitat | |
| Menetelmä 1 | Helppo käyttää | Liian tylsiä, jos laskentataulukoita on liian monta |
| Menetelmä 2 | Nopeampi kuin menetelmä 1, jos useita laskentataulukoita | Vaatii, että luetat numerot ja taulukoiden nimet etukäteen |
| Menetelmä 3 | Paljon nopeammin ja tehokkaammin kuin edellä mainitut 2 menetelmää | Ole varovainen ulkoisten makrojen suhteen, jotka voivat olla haitallisia |
Palauta vioittuneet Excel-tiedostot
Excel voi ajoittain kaatua, mikä voi johtaa Excel-tiedostojen vioittumiseen. Siksi sinun on tottunut tallentamaan tiedosto joka kerta, kun vaihdat Excel-tiedostoa. Muussa tapauksessa, jos Excel kaatuu, mutta et ole tallentanut avattua tiedostoa, sinun on käytettävä sitä xls korjata ohjelmistot, kuten DataNumen Excel Repair, saadaksesi vahingoittuneet Excel-tiedot.
Tekijän esittely:
Shirley Zhang on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien mdf-palautus ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com