Kuinka luoda nopeasti katalogi Excel-työkirjallesi VBA:n kautta

Luettelon luominen työkirjalle, jossa on monia laskentataulukoita, on välttämätöntä. Tässä on nopea tapa luoda luettelo Excel-laskentataulukossa.

Edellisessä artikkelissamme Kuinka luoda luettelo Exceliin hyperlinkkien avulla, olemme puhuneet luettelon luomisesta lisäämällä hyperlinkkejä laskentataulukkoon. Luettelon luominen työkirjalle, jossa on useita laskentataulukoita, voi olla erittäin hyödyllistä. Mutta hyperlinkkien lisääminen yksitellen manuaalisesti voi olla aikaa vievää. Siksi meillä on uusi tapa luoda nopeasti tällainen luettelo.

Luo luettelo

Alla olevassa kuvassa työkirjassa on monia laskentataulukoita.Esimerkki katalogista

Ja nyt voit luoda luettelon tähän työkirjaan.

  1. Napsauta hiiren kakkospainikkeella jotakin nauhan välilehteä.
  2. Napsauta sitten valikon "Muokkaa nauhaa" -painiketta.Muokkaa nauhaa
  3. Valitse "Excel-asetukset" -ikkunassa "Kehittäjä"-vaihtoehto "Päävälilehdet" -alueella.
  4. Napsauta sitten “OK”.Tarkista kehittäjä
  5. Napsauta nyt valintanauhan Kehittäjä-välilehteä.
  6. Napsauta sitten työkalupalkin Visual Basic -painiketta.Visual Basic

Olet siis avannut Visual Basic Editorin. Itse asiassa voit myös painaa näppäimistön pikanäppäintä "Alt + F11" avataksesi editorin nopeasti.

  1. Napsauta nyt hiiren oikealla painikkeella VBA-projektoria.
  2. Siirrä sitten kohdistin vaihtoehdon "Lisää".
  3. Valitse alivalikosta vaihtoehto "Moduuli".Aseta moduuli

Siksi olet lisännyt projektiin uuden moduulin.

  1. Kopioi nyt seuraavat VBA-koodit uuteen moduuliin:

Sub CreateMenu()

    Himmennä As Integer

    a = 1

    'lisää uusi taulukko

    Worksheets.Add Before:=Sheets(1)

    Sheets(1).Nimi = "Valikko"

    Työarkit ("Valikko"). Alue ("A1"). Arvo = "Valikko"

    Jos a = 2 To ActiveWorkbook.Worksheets.Count

        Työarkit("Valikko"). Alue("A" & a) = Sheets(a).Nimi

        ActiveSheet.Hyperlinks.Add Anchor:=Työtaulukot("Valikko"). Alue("A" & a), _

        Osoite:="", _

        Alaosoite:=”'” & Sheets(a).Nimi & “'!R1C1”, _

        TextToDisplay:=Sheets(a).Nimi

    seuraava

End Sub

Tämän koodin alussa lisäämme uuden laskentataulukon nimeltä "Valikko". Jos laskentataulukko nimeltä "Menu" on jo olemassa, voit joko muuttaa VBA-koodia tai muuttaa olemassa olevan laskentataulukon nimen. Lisäksi syötämme luettelon uuden laskentataulukon ensimmäiseen sarakkeeseen. Jos haluat syöttää luettelon eri alueelle, voit myös muokata sitä tarpeidesi mukaan.

  1. Paina nyt työkalupalkin Run Sub -painikettaSuorita Sub

Lisäksi voit myös painaa näppäimistön näppäintä “F5”.

  1. Palaa nyt laskentataulukon käyttöliittymään.Luettelo

Työkirjassa on uusi laskentataulukko nimeltä "Valikko". Ja kaikki arkkien nimet on lueteltu laskentataulukossa vastaavien hyperlinkkien kanssa. Tällä menetelmällä voit helposti luoda luettelon nopeasti.

Kahden menetelmän vertailu

Edellisessä artikkelissamme Kuinka luoda luettelo Exceliin hyperlinkkien avulla, lisäämme luettelon manuaalisesti. Ja vertaamme näiden kahden menetelmän eroa alla olevassa taulukossa.

Vertailu Luo katalogi manuaalisesti Käytä VBA-menettelyä
Advantage 1. Jokainen Excel-käyttäjä voi käyttää tätä menetelmää helposti.

2. Jos sinulla ei ole tietoa VBA:sta, voit käyttää tätä menetelmää.

1. VBA-menettelyjen avulla voit suorittaa tämän tehtävän yhdellä napsautuksella.

2. Voit myös muuttaa VBA-koodeja muiden vaatimusten täyttämiseksi.

haitta 1. Jos työkirjassa on paljon laskentataulukoita, käytät varmasti paljon aikaa hyperlinkkien lisäämiseen.

2. Sinun on valittava hyperlinkit yksitellen, ja tämä johtaa helposti virheisiin.

1. Jos et tunne VBA-koodeja, kohtaat ongelmia koodeja suoritettaessa.

2. VBA-koodien käyttö vaikeuttaa tehtävää.

 

Käsittele odottamattomia tilanteita Excelissä

Jos käytät Exceliä usein tehtävien suorittamiseen, kohtaat väistämättä virheitä. Useimmiten voit sulkea Excelin ja käynnistää sen uudelleen. Näin pienet virheet katoavat. Jotkin Excelin virheet voivat kuitenkin johtaa vakaviin Excelin vioittumisiin. Ja seuraukset voivat olla käsittämättömiä. Tällä hetkellä voit korjaa xls-tietoongelma asiantuntevalla työkalullamme. Tämän tehokkaan työkalun avulla sinun tarvitsee vain odottaa palautumisprosessin päättymistä.

Tekijän esittely:

Anna Ma on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien korjata doc-tietovauriot ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com

Kommenttien lisääminen on estetty.