Monet kollegoistani viettävät paljon aikaa yhteenvetotaulukon luomiseen Excelissä.
Tyypillisessä yhteenvetotaulukossa on kaikkien laskentataulukoiden nimet eri soluissa ja kaikki nimet on myös linkitetty näihin laskentataulukoihin.
Joten voit napsauttaa solua, jolla on taulukon nimi (sano Jan, helmi, maaliskuu… ) ja se vie sinut laskentataulukkoon. Lisäksi jokaisessa laskentataulukossa on hyperlinkki, joka linkittää takaisin yhteenvetotaulukkoon.
Vaikka kollegoistani on tullut erittäin tehokkaita tässä, se on silti ajanhukkaa, kun voit tehdä saman alle sekunnissa (kyllä, luit oikein).
Temppu on luoda lyhyt makro, joka tekee sen puolestasi.
Riippumatta siitä, kuinka monta laskentataulukkoa sinulla on, se luo heti yhteenvetotaulukon, jossa on toimivia hyperlinkkejä.
Jotain alla olevan kuvan mukaisesti:
Kuten yllä olevasta kuvasta näkyy, se luo heti yhteenvedon, kun suoritat makron (napsauttamalla painiketta). Taulukon nimet on linkitetty hyperlinkillä, joka vie sinut laskentataulukkoon, kun napsautat sitä.
Luo yhteenveto -laskentataulukko hyperlinkkeillä
Kaikki yhteenvetotaulukon luomisen raskaat nostot tehdään lyhyellä VBA -koodilla. Sinun tarvitsee vain suorittaa koodi ja pitää tauko, koska sinulla olisi nyt vapaa -aikaa 🙂
Tässä on koodi:
Sub CreateSummary () 'Luo Sumit Bansal of trumpexcel.com' Tätä koodia voidaan käyttää yhteenvetotaulukon luomiseen hyperlinkkeillä Dim x Kuten laskentataulukko Dim Laskuri Integer -laskurina = 0 Kullekin x laskentataulukoille Laskuri = Laskuri + 1 Jos Laskuri = 1 Sitten GoTo Donothing ActiveCell .Value = x.Name .Hyperlinks.Add ActiveCell, "", x.Name & "! A1", TextToDisplay: = x.Name, ScreenTip: = "Napsauta tästä siirtyäksesi laskentataulukkoon, jossa on laskentataulukoita (Laskuri) .Range ("A1"). Arvo = "Takaisin" & ActiveSheet.Name .Hyperlinks.Add Sheets (x.Name) .Range ("A1"), "", _ "'" & ActiveSheet.Name & "" "&"! " & ActiveCell.Address, _ ScreenTip: = "Return to" & ActiveSheet.Name End with End with ActiveCell.Offset (1, 0) .Valitse Donothing: Next x End Sub
Minne tämä koodi laitetaan?
Aseta tämä koodi työkirjaan seuraavasti:
- Siirry Kehittäjä -välilehteen ja napsauta Visual Basic. Voit käyttää myös pikanäppäintä - ALT F11.
- Jos löydät kehittäjä -välilehden Excelin valintanauhasta, napsauta tätä ja tutustu sen hankkimiseen.
- Jos löydät kehittäjä -välilehden Excelin valintanauhasta, napsauta tätä ja tutustu sen hankkimiseen.
- Project Explorer -ruudun pitäisi olla vasemmalla (jos se ei ole näkyvissä, käytä Control + R -näppäintä sen näyttämiseksi).
- Siirry kohtaan Lisää ja napsauta moduulissa. Tämä lisää moduulin työkirjaan. Näet myös oikealla olevan koodi -ikkunan (vilkkuva kohdistin).
- Kopioi ja liitä yllä oleva koodi moduulin koodi -ikkunassa.
Koodin suorittaminen
Tämän koodin suorittaminen:
- Valitse Kehittäjä -välilehti -> Koodi -> Makrot. Tämä avaa Macro Dialogue -ruudun.
- Valitse Makron luontiyhteenveto ja napsauta Suorita.
- Tämä suorittaa makron ja luo hyperlinkit aktiiviseen taulukkoon.
Toinen tapa suorittaa makro on lisätä painike/muoto ja määrittää makro sille. Tehdä tämä:
- Lisää muoto laskentataulukkoon. Muotoile muoto haluamallasi tavalla.
- Napsauta sitä hiiren kakkospainikkeella ja valitse Määritä makro.
- Valitse Määritä makro -ruudusta makro, jonka haluat määrittää muodolle, ja napsauta OK.
Voit nyt suorittaa makron napsauttamalla muotoa.
Lataa tiedosto täältä
merkintä:
- Olen koodannut solun A1 jokaiseen arkkiin, joka on linkitetty, jotta pääset takaisin yhteenvetoarkille. Varmista, että muutat sitä vastaavasti, jos jokaisessa taulukossa on jotain jo A1 -solussa.
- Yhteenveto ei luo hyperlinkkiä itselleen (mikä on järkevää, koska olet jo tällä sivulla).
- Suorita tämä koodi, kun Yhteenveto -laskentataulukko on aktiivinen laskentataulukko.
- Voit halutessasi lisätä muotoilua tai uudelleenjärjestelyä. Mutta toivon, että tämä koodi huolehtii vaikeasta osasta.
- Tallenna tämä työkirja .xls- tai .xlsm -laajennuksena, koska se sisältää makron.
Muut Excel VBA -opetusohjelmat:
- Saat useita hakuarvoja ilman toistoa yhdessä solussa.
- Tehtävien priorisointimatriisi - VBA -sovellus.
- Useiden työkirjojen yhdistäminen yhdeksi Excel -työkirjaksi.
- Excel VBA -silmukat - seuraavaksi, tee vaikka, tee kunnes, jokaiselle (esimerkkien avulla).
- Makron tallentaminen - vaiheittainen opas.
- Hyperlinkkien poistaminen nopeasti Excelin laskentataulukosta.
- Excelin VBA -verkkokurssi.
