Kui teil on Exceli töövihik, milles on sadu töölehti, ja nüüd soovite saada kõigi töölehtede nimede loendit, võite vaadata seda artiklit. Siin jagame teiega 3 lihtsat meetodit.
Mõnikord peate võib-olla looma Exceli töövihikus kõigi töölehtede nimede loendi. Kui lehti on vähe, saate lehtede nimede käsitsi loetlemiseks kasutada 1. meetodit. Kui aga Exceli töövihik sisaldab suurel hulgal töölehti, on parem kasutada kahte viimast meetodit, mis on palju tõhusamad.
1. meetod: hankige loend käsitsi
- Esiteks avage konkreetne Exceli töövihik.
- Seejärel topeltklõpsake lehe nime lehe loendis allosas.
- Järgmisena vajutage nime kopeerimiseks klahve „Ctrl + C”.
- Hiljem looge tekstifail.
- Seejärel vajutage lehe nime kleepimiseks klahvikombinatsiooni „Ctrl + V”.
- Nüüd saate sel viisil iga lehe nime ükshaaval tekstifaili kopeerida.
2. meetod: loend koos valemiga
- Alguses minge vahekaardile "Valemid" ja klõpsake nuppu "Nimehaldur".
- Järgmisena klõpsake hüpikaknas nuppu "Uus".
- Järgmises dialoogiboksis sisestage väljale "Nimi" "ListSheets".
- Hiljem sisestage väljale „Viitab” järgmine valem:
=ASENDA(HANKI.TÖÖRAAMAT(1),1,LEIA("]",HANKI.TÖÖRAAMAT(1)),"")
- Pärast seda klõpsake selle valemi salvestamiseks "OK" ja "Sule".
- Järgmisena looge praeguses töövihikus uus tööleht.
- Seejärel sisestage lahtrisse A1 “1” ja lahtrisse A2 “2”.
- Seejärel valige kaks lahtrit ja lohistage need alla, et sisestada veerus A 2,3,4,5 jne.
- Hiljem sisestage lahtrisse B1 järgmine valem.
=INDEKS(loendilehed,A1)
- Lahtrisse B1 sisestatakse kohe esimese lehe nimi.
- Lõpuks kopeerige lihtsalt valem alla, kuni näete "#REF!" viga.
3. meetod: koostage loend Excel VBA kaudu
- Sest nagutart, käivitage Exceli VBA redaktor vastavalt "Kuidas Excelis VBA koodi käivitada".
- Seejärel sisestage järgmine kood moodulisse või projekti.
Sub ListSheetNamesInNewWorkbook() Dim objNewWorkbook As Workbook Dim ObjNewWorksheet as Worksheet Set objNewWorkbook = Excel.Application.Workbooks.Add Set objNewWorksheet = objNewWorkbook.Sheets = ObjNewWorkbook.Sheets = CounterWork.kks1 For ThisW. Lahtrid(i, 1) = i objNewWorksheet.Cells(i, 1) = ThisWorkbook.Sheets(i).Nimi Järgmine i Koos objUustöölehega .Read(2).Insert .Cells(1, 1) = "INDEKS" .Cells(1, 1).Font. Paks = Tõene .Cells(1, 1) = "NAME" .Cells(2, 1).Font.Bold = Tõene .Veerud("A:B"). Automaatne sobitamine End alamlõpuga
- Hiljem vajutage selle makro käivitamiseks kohe nuppu F5.
- Korraga kuvatakse uus Exceli töövihik, milles näete Exceli lähtetöövihiku töölehtede nimede loendit.
võrdlus
| Eelised | Puudused | |
| Meetod 1 | Lihtne kasutada | Liiga tülikas, kui töölehti on palju |
| Meetod 2 | Lihtne kasutada | Nõuab kõigepealt indeksi tippimist |
| Meetod 3 | Kiire ja mugav | Kasutajad peaksid väliste pahatahtlike makrode eest ettevaatlikud olema |
| Lihtne isegi VBA algajatele |
Excel saab rikutud
On teada, et MS Excel jookseb aeg-ajalt kokku, kahjustades sellega salvestamisel praeguseid faile. Seetõttu on tungivalt soovitatav hankida väline võimas Exceli remont tööriist, näiteks DataNumen Outlook Repair. Selle põhjuseks on asjaolu, et see Exceli enesetaastefunktsioon ebaõnnestub sageli.
Autori sissejuhatus:
Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas sql parandus ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom
säästsid mu palju aega, terviseks!
Nevím, ale mně metoda č. 2 nefunguje – píše, že ve vzorci je chyba.
2. meetod töötas suurepäraselt. Nii lihtne ja kiire.
Kui soovite näha vahekaardi nimesid ja mitte salvestada seda faili, järgige alltoodud samme.
1. samm: hoidke hiirt kas vasakpoolse vahekaardi nihutamise ikoonil (mida tähistab sümbol).
2. samm: vajutage nuppu "Ctrl" ja paremklõpsake hiirenuppu.
3. samm: näete kõiki vahekaartide nimesid hüpikmenüü pealkirjaga "Aktiveeri"
Kui soovite lihtsalt vaadata vahekaartide nimesid, järgige alltoodud kolme lihtsat sammu.
1. samm: hoidke hiirt kas vasakpoolse vahekaardi nihutamise ikoonil (mida tähistab sümbol).
2. samm: vajutage nuppu "Ctrl" ja paremklõpsake hiirenuppu.
3. samm: näete kõiki vahekaartide nimesid hüpikmenüü pealkirjaga "Aktiveeri"
Töötas nagu võlu. Aitäh.
Vau, hämmastav ajaveebi struktuur! Kui kaua sa oled bloginud?
muudate ajaveebi pidamise lihtsaks. Kogu teie veebisaidi välimus on suurepärane, sisust rääkimata!
Sarnast näete siin e-kaubanduses
Mõtlesin ja eemaldasin sõnumi
Kas keegi leidis meetodi nr 2 puhul, kasutades makrot ListSheets (=ASENDA(GET.WORKBOOK(1),1,FIND(“]”,GET.WORKBOOK(1)),”)”), kuidas sundida uuesti arvutus? Ma saan muuta lehe nime, kuid seni, kuni ma tühjendan lahtri sisu ja sisestan uuesti valemi =INDEX(ListSheets,[RefCell]), jääb tulemusesse vana lehe nimi.
Ma ei näinud vastust teistele, kes posted küsimused, kuid kohtasin #BLOCKED! viga pärast Exceli sulgemist ja faili selle makroga uuesti avamist. Mul oli vaja muuta failikataloog, kus see on salvestatud, usaldusväärseks asukohaks.
Erakordne!!!!
Töötas valemimeetodiga suurepäraselt ja lihtsalt. Hämmastav. Aitäh!
Armastan sind selle eest!
Soovime veel kord tänada imeliste ideede eest, mida pakkusite Janetile tema enda lkost- kraadiõppe uurimine
pluss, most mis on oluline, mis puudutab kõigi ideede esitamist ajaveebis lkost.
Kui oleksime teie veebisaidist aasta tagasi teadlikud, oleksime võib-olla päästetud
kasutute meetmete eest, mida me kasutasime.
Tänan teid väga. mänguasjad täiskasvanutele
Oleme vabatahtlike rühm ja avame oma kogukonnas uue kava.
Teie veebisait pakkus meile väärtuslikku teavet, mille kallal edasi töötada. Olete teinud suure töö
ja kogu meie kogukond on teile tänulik.
annetada Ukraina heaks
Suurepärane, milline ajaveebi see on! See veebisait pakub kasulikke andmeid
meie, jätka samas vaimus. annetada Ukraina heaks
Palun tööta krna sikha dain
Tänan teid selle eest. Sammu salvestamiseks kasutasin funktsiooni:
=INDEKS(loendilehed,RIDA(A1))
ja kopeeris selle alla. Nii ei vaja ma veergu, et hoida numbreid 1 kuni n
3. meetod töötab nagu võlu. Kas keegi teab, kuidas muuta VBA koodi, et luua olemasolevas töövihikus tööleht, et kuvada töölehtede nimede loend?
Ma armastan su blogi.. väga ilusad värvid ja teema. Kas tegite selle veebisaidi ise või palkasite kellegi selle teie eest ära tegema? Palun vastake, kuna soovin oma ajaveebi kujundada ja tahaksin teada, kust selle said. tänud
大変参考になりました、ありがとう.
MIS ON MU FAILINIMI ON VÄGA PIK? ÜTLE, SEE ON NUMBRID JA 24 NUMBRIT PIKK.. SELLE VALEMI KASUTAMISEGA Avastasin AINULT ESIMESED 12 NUMBRIT TÖÖLEHED.
Aitäh. 2. meetod oli täpselt see, mida ma vajasin 🙂
Kui muudan lehe nime, siis ma ei värskenda ja sellele viidatud lahtrid saavad #REF! viga. Kuidas lahendada ilma makrota? Aitäh.
o.web20.services
Suur tänu – täpselt see, mida vajasin.
Tänan sind väga!!! Väga kasulik
Suured tänud!
Uute O365 funktsioonidega saate otse kasutada =TRANSPOSE(ListSheets).
Kui soovite/vajate ka lehtede numbreid, on =SEQUENCE(COLUMNS(ListSheets)) isegi dünaamiline.
aitäh, meetod 3 päästis mulle paar tundi ctr-C/ctr-V
Tänan teid väga nende kolme võimaluse jagamise eest. Ma ei nõustu kasutajaga, kes viitas post kui "idioot". Kritiseerida on väga lihtne, kuid teiste abistamiseks on vaja tõsist pingutust. Täname teid abi eest!
see on idiootne – tehke lihtsalt hulluks PDF Exceli failist – saate nimed ja a PDF igast.
Meetod XNUMX töötas nagu võlu, aitäh
Kuidas saada see uue töövihiku loomise asemel praeguses töövihikus vahekaarti looma/värskendama?
Vinge! Teine meetod töötas suurepäraselt. Juhised olid selged ja ekraanipildid olid abiks. Ei lähe paremaks.
Saan ka #BLOCKED! 2. valiku veateade ja ma ei leia viisi blokeeringu tühistamiseks 🙁
Aitäh, säästsin palju tööd
2. meetod ei tööta Excel 2021-s!
Lihtsalt 2. kommentaarimeetod ei nõua kõigepealt loendit, kui asendate =INDEX(Loendilehed,A1) väärtusega =INDEX(Loendilehed,Rida(A1)).
2. meetod nõuab ka salvestamist makrotoega töövihikuna, kuna see kasutab Excel 4.0 pärandfunktsiooni
Tõesti hinnatud. Nii kiire VBA kasutamiseks "madalate teadmistega"!
Tänan, kuidas ma saan juba olemasoleva vahekaardi "Tab Index" praeguses failis olevad tulemused veel paremini tabelisse väljastada?
See oli lahe!! Aitäh VBA koodi eest!!!!!! Säästis mind nagu tund aega tuimestavat tööd!
Saan veateate #BLOCKED! kui proovin meetodit 2 (loetelu koos valemiga). Soovin kasutada oma töövihikus lehe nime, nii et VBA-meetodist pole abi.
Tere! Nimekiri Exceli VBA kaudu töötab suurepäraselt, palun soovitage, mida selle koodi saamiseks muutatart reas 4, veerus B (indeks B4-s, nimi C4-s)
Aitäh! See säästis minu jaoks nii palju aega, ma hindan väga, et jagate seda kõigiga!
BTW, kas on võimalik printida ainult nähtavad töölehed (ja mitte peidetud)? Ma tean, et küsin siin palju, kuid see võib valemi veelgi paremaks muuta 🙂
Palju õnne ja suur tänu!!!
Aitäh selle makro eest! See töötas nagu võlu
See on hämmastav. Suur tänu post! Säästsid mulle lihtsalt töötunde.