Jos sinulla on Excel-työkirja, jossa on satoja laskentataulukoita, ja nyt haluat saada luettelon kaikista laskentataulukoiden nimistä, voit viitata tähän artikkeliin. Täällä jaamme 3 yksinkertaista menetelmää kanssasi.
Joskus saatat joutua luomaan luettelon kaikista laskentataulukoiden nimistä Excel-työkirjassa. Jos taulukoita on vain vähän, voit käyttää tapaa 1 luetteloiden arkkien nimet manuaalisesti. Jos kuitenkin Excel-työkirja sisältää suuren määrän laskentataulukoita, sinun on parempi käyttää kahta jälkimmäistä menetelmää, jotka ovat paljon tehokkaampia.
Tapa 1: Hae luettelo manuaalisesti
- Avaa ensin tietty Excel-työkirja.
- Kaksoisnapsauta sitten arkin nimeä alareunassa olevassa luettelossa.
- Kopioi sitten nimi painamalla ”Ctrl + C”.
- Luo myöhemmin tekstitiedosto.
- Liitä sitten taulukon nimi painamalla ”Ctrl + V”.
- Tällä tavalla voit kopioida jokaisen arkin nimen tekstitiedostoon yksitellen.
Tapa 2: Luettelo kaavalla
- Käänny alusta alkaen "Kaavat" -välilehdelle ja napsauta "Nimihallinta" -painiketta.
- Napsauta seuraavaksi ponnahdusikkunassa "Uusi".
- Kirjoita seuraavassa valintaikkunassa ”ListSheets” Nimi-kenttään.
- Syötä myöhemmin Viittaukset-kenttään seuraava kaava:
= VAIHDA (TYÖKIRJA (1), 1, LÖYDÄ ("]", TYÖKIRJA (1)), "")
- Sen jälkeen napsauta “OK” ja “Sulje” tämän kaavan tallentamiseksi.
- Luo seuraavaksi uusi laskentataulukko nykyiseen työkirjaan.
- Syötä sitten ”1” soluun A1 ja ”2” soluun A2.
- Valitse sitten kaksi solua ja vedä ne alas syöttääksesi sarakkeeseen A 2,3,4,5 jne.
- Lisää myöhemmin seuraava kaava soluun B1.
= HAKEMISTO (ListSheet, A1)
- Ensimmäisen arkin nimi syötetään kerralla soluun B1.
- Lopuksi, kopioi kaava alaspäin, kunnes näet "#REF!" virhe.
Tapa 3: Luettelo Excel VBA: n kautta
- Sillä kutentart, laukaise Excel VBA -editoriKuinka suorittaa VBA-koodi Excelissä".
- Laita sitten seuraava koodi moduuliin tai projektiin.
AlalistaSheetNamesInNewWorkbook () Dim objNewWorkbook As Workbook Dim objNewWorksheet As Worksheet Set objNewWorkbook = Excel.Application.Workbooks.Add Set objNewWorksheet = objNewWorkbook.Sheets (1) For i = 1 ToWorkbook.Sheets.Count 1Custom objeweworks i objNewWorksheet.Cells (i, 2) = ThisWorkbook.Sheets (i) .Nimi Seuraava i with objNewWorksheet .Rows (1) .Lisää .Cells (1, 1) = "INDEX" .Cells (1, 1) .Font. Lihavoitu = True .Cells (1, 2) = "NAME" .Cells (1, 2) .Font.Bold = True .Columns ("A: B"). AutoFit End With End Sub
- Suorita tämä makro painamalla myöhemmin ”F5”.
- Samanaikaisesti tulee näkyviin uusi Excel-työkirja, jossa näet luettelon lähteen Excel-työkirjan laskentataulukoiden nimistä.
Vertailu
| edut | Haitat | |
| Menetelmä 1 | Helppo käyttää | Liian hankala, jos laskentataulukoita on paljon |
| Menetelmä 2 | Helppo käyttää | Vaatii, että kirjoitat hakemiston ensin |
| Menetelmä 3 | Nopea ja kätevä | Käyttäjien tulisi varoa ulkoisia haitallisia makroja |
| Helppo jopa VBA-aloittelijoille |
Excel vioittuu
MS Excelin tiedetään kaatuvan ajoittain, mikä vahingoittaa nykyisiä tiedostoja tallennettaessa. Siksi on erittäin suositeltavaa saada käsiinsä ulkoinen voimakas Excel-korjaus työkalu, kuten DataNumen Outlook Repair. Se johtuu siitä, että kyseisen itsensä palauttamisen ominaisuuden epäonnistuu usein.
Tekijän esittely:
Shirley Zhang on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien sql-korjaus ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com
säästät minulta paljon aikaa, hurraa!
Nevím, ale mně metoda č. 2 nefunguje – píše, že ve vzorci je chyba.
Menetelmä 2 toimi hyvin. Niin helppoa ja nopeaa.
Jos haluat nähdä välilehden nimet etkä tallentaa sitä tiedostoon, noudata alla mainittuja ohjeita:
Vaihe 1: Pidä hiirtä joko "vasemman välilehden siirto" -kuvakkeen päällä (esitetty symbolilla).
Vaihe 2: Paina "Ctrl"-painiketta ja napsauta hiiren kakkospainiketta.
Vaihe 3: Näet kaikki "välilehtien nimet" ponnahdusvalikon otsikolla "Aktivoi".
Jos haluat vain tarkastella välilehtien nimiä, noudata kolmea alla mainittua yksinkertaista vaihetta:
Vaihe 1: Pidä hiirtä joko "vasemman välilehden siirto" -kuvakkeen päällä (esitetty symbolilla).
Vaihe 2: Paina "Ctrl"-painiketta ja napsauta hiiren kakkospainiketta.
Vaihe 3: Näet kaikki "välilehtien nimet" ponnahdusvalikon otsikolla "Aktivoi".
Toimi kuin hurmaa. Kiitos.
Vau, mahtava blogirakenne! Kauanko olet blogannut?
saat blogin pitämisen näyttämään helpolta. Koko sivustosi ulkoasu on upea, sisällöstä puhumattakaan!
Voit nähdä vastaavan täällä verkkokaupan
Olen ajatellut ja poistanut viestin
Löysikö kukaan menetelmässä 2, käyttämällä ListSheets-makroa (=KORVAA(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),"")). laskeminen? Voin muuttaa taulukon nimeä, mutta kunnes tyhjennän solun sisällön ja syötän uudelleen =INDEX(ListSheets,[RefCell]) -kaavan, vanha taulukon nimi pysyy tuloksessa.
En nähnyt vastausta muille, jotka posted kysymyksiä, mutta törmäsin #BLOCKED! virhe Excelin sulkemisen ja tiedoston uudelleen avaamisen jälkeen tällä makrolla. Minun piti tehdä tiedostohakemistosta, johon se on tallennettu, Luotettu sijainti.
Epätavallinen!!!!
Toimii loistavasti ja helposti kaavamenetelmällä. Hämmästyttävä. Kiitos!
Rakastan sinua tästä!
Haluamme vielä kerran kiittää teitä upeista ideoista, joita annoitte Janetille valmistellessaan omaa post-tutkinnon suorittanut tutkimus
plus, most mikä tärkeintä, koskien kaikkien ideoiden tarjoamista blogissa post.
Jos olisimme tienneet verkkosivustostasi vuosi sitten, olisimme saaneet pelastua
käyttämiemme hyödyttömien toimenpiteiden takia.
Kiitos paljon. leluja aikuisille
Olemme vapaaehtoisten ryhmä ja avaamassa uutta järjestelmää yhteisössämme.
Verkkosivustosi tarjosi meille arvokasta tietoa työstettäväksi. Olet tehnyt valtavan työn
ja koko yhteisömme on kiitollinen sinulle.
lahjoittaa Ukrainalle
Loistavaa, mikä blogi se on! Tämä verkkosivusto tarjoaa hyödyllistä tietoa
me, jatka samaan malliin. lahjoittaa Ukrainalle
Ole hyvä ja työskentele krna sikha dain
Kiitos tästä. Askeleen tallentamiseen käytin toimintoa:
=INDEKSI(Listataulukot,RIVI(A1))
ja kopioinut sen alas. Tällä tavalla en tarvitse saraketta numeroiden 1 - n pitämiseen
Menetelmä 3 toimii kuin hurmaa. Tietääkö kukaan, miten VBA-koodia muutetaan laskentataulukon luomiseksi olemassa olevaan työkirjaan laskentataulukoiden nimien luettelon näyttämiseksi?
Pidän blogistasi.. erittäin kauniit värit ja teema. Teitkö tämän sivuston itse vai palkkasitko jonkun tekemään sen puolestasi? Vastaa, koska aion suunnitella oman blogini ja haluaisin tietää, mistä sait tämän. Kiitos paljon
大変参考になりました、ありがとう.
MIKÄ ON TIEDOSTONIMI ON ERITTÄIN PITKÄ? SANO ON NUMERO JA 24 NUMEROA PITKÄ.. Löysin TÄTÄ KAAVAA KÄYTTÄMÄLLÄ VAIN ENSIMMÄISET 12 NUMEROA TYÖLÄHTEISTÄ.
Kiitos. Tapa 2 oli juuri sitä mitä tarvitsin 🙂
Jos vaihdan taulukon nimeä, en päivitä ja siihen viitatut solut saavat #REF! virhe. Kuinka ratkaista ilman makroa? Kiitos.
o.web20.services
Kiitos paljon – juuri sitä mitä tarvitsin.
Kiitos paljon!!! Erittäin hyödyllinen
Kiitos paljon!
Uusilla O365-funktioilla voit käyttää suoraan =TRANSPOSE(ListSheets).
Jos haluat/tarvitset myös arkkinumeroita, =SEQUENCE(COLUMNS(ListSheets)) on jopa dynaaminen.
kiitos, menetelmä 3 säästi minulta muutaman tunnin ctr-C/ctr-V
Kiitos, että jaoit nämä kolme vaihtoehtoa. Olen eri mieltä käyttäjän kanssa, joka viittasi post "idioottimaisena". On erittäin helppoa kritisoida, mutta muiden auttaminen vaatii todellista vaivaa. Kiitos avustasi!
tämä on idioottimaista – tee vain hulluksi PDF excel-tiedostosta – saat nimet ja a PDF jokaista.
Tapa kaksi toimi kuin hurmaa, kiitos
Miten saan sen luomaan/päivittämään välilehden nykyiseen työkirjaan uuden työkirjan luomisen sijaan?
Mahtava! Toinen tapa toimi hyvin. Ohjeet olivat selkeät ja kuvakaappaukset hyödyllisiä. Ei parane.
Saan myös #BLOCKED! virheilmoitus vaihtoehdolle 2, enkä löydä tapaa poistaa esto 🙁
Kiitos, säästyin monelta työltä
Tapa 2 ei toimi Excel 2021:ssä!
Pelkästään kommenttimenetelmä 2 ei vaadi luetteloa ensin, jos korvaat =INDEX(ListSheets,A1) =INDEX(ListSheets,Row(A1)).
Tapa 2 edellyttää myös tallentamista makrokäyttöisenä työkirjana, koska se käyttää Excel 4.0:n vanhaa toimintoa
Todella arvostettu. VBA:n käyttäminen "vähän tietämyksestä" on niin nopeaa!
Kiitos, kuinka saan tulokset tulostetuksi nykyisessä tiedostossani jo olemassa olevalla "Tab Index" -välilehdellä, vielä paremmin taulukoksi?
Se oli mahtavaa!! Kiitos VBA-koodista!!!!!! Säästi minut kuin tunnin mieltä turruttavalta työltä!
Saan virheilmoituksen #BLOCKED! kun kokeilen menetelmää 2 (luettelo kaavan kanssa). Haluan käyttää arkin nimeä työkirjassani, joten VBA-menetelmästä ei ole apua.
Hei, Lista Excel VBA:n kautta toimii hyvin. Ehdota, mitä koodia pitäisi muuttaa saadaksesi sen start rivillä 4, sarakkeessa B (indeksi B4:ssä, nimi C4:ssä)
Kiitos! Tämä säästi minulle niin paljon aikaa, olen todella kiitollinen, että jaoit tämän kaikkien kanssa!
BTW, onko olemassa tapa tulostaa vain näkyvät laskentataulukot (eikä piilotetut)? Tiedän, että pyydän paljon täältä, mutta se saattaa tehdä kaavasta vielä paremman 🙂
Onnittelut ja kiitos paljon !!!
Kiitos makrosta! Se toimi kuin viehätys
Tämä on hämmästyttävä. Kiitos paljon post! Säästit minulle työtunteja.