3 kiiret viisi Exceli töövihiku kõigi töölehtede nimede loendi hankimiseks

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.

Töölehed Exceli töövihikus

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

  1. Esiteks avage konkreetne Exceli töövihik.
  2. Seejärel topeltklõpsake lehe nime lehe loendis allosas.
  3. Järgmisena vajutage nime kopeerimiseks klahve „Ctrl + C”.Kopeeri lehe nimi
  4. Hiljem looge tekstifail.
  5. Seejärel vajutage lehe nime kleepimiseks klahvikombinatsiooni „Ctrl + V”.Kleebi lehe nimi
  6. Nüüd saate sel viisil iga lehe nime ükshaaval tekstifaili kopeerida.

2. meetod: loend koos valemiga

  1. Alguses minge vahekaardile "Valemid" ja klõpsake nuppu "Nimehaldur".
  2. Järgmisena klõpsake hüpikaknas nuppu "Uus".Nimehaldur
  3. Järgmises dialoogiboksis sisestage väljale "Nimi" "ListSheets".
  4. Hiljem sisestage väljale „Viitab” järgmine valem:
=ASENDA(HANKI.TÖÖRAAMAT(1),1,LEIA("]",HANKI.TÖÖRAAMAT(1)),"")

Kohandage uut nime

  1. Pärast seda klõpsake selle valemi salvestamiseks "OK" ja "Sule".
  2. Järgmisena looge praeguses töövihikus uus tööleht.
  3. Seejärel sisestage lahtrisse A1 “1” ja lahtrisse A2 “2”.
  4. Seejärel valige kaks lahtrit ja lohistage need alla, et sisestada veerus A 2,3,4,5 jne.Sisestage järjestikused numbrid
  5. Hiljem sisestage lahtrisse B1 järgmine valem.
=INDEKS(loendilehed,A1)

Sisestage valem lahtrisse B1

  1. Lahtrisse B1 sisestatakse kohe esimese lehe nimi.
  2. Lõpuks kopeerige lihtsalt valem alla, kuni näete "#REF!" viga.Kopeerige valem alla lehtede nimede loendisse

3. meetod: koostage loend Excel VBA kaudu

  1. Sest nagutart, käivitage Exceli VBA redaktor vastavalt "Kuidas Excelis VBA koodi käivitada".
  2. 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

VBA kood – loendilehtede nimed

  1. Hiljem vajutage selle makro käivitamiseks kohe nuppu F5.
  2. Korraga kuvatakse uus Exceli töövihik, milles näete Exceli lähtetöövihiku töölehtede nimede loendit.Loetletud lehtede nimed uues Exceli töövihikus

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

42 vastust teemale "3 kiiret viisi Exceli töövihiku kõigi töölehtede nimede loendi hankimiseks"

  1. 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"

  2. 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"

  3. 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

  4. 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.

  5. 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

  6. 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

  7. 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

  8. 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?

  9. 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

  10. 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.

  11. Kui muudan lehe nime, siis ma ei värskenda ja sellele viidatud lahtrid saavad #REF! viga. Kuidas lahendada ilma makrota? Aitäh.

  12. Suured tänud!
    Uute O365 funktsioonidega saate otse kasutada =TRANSPOSE(ListSheets).
    Kui soovite/vajate ka lehtede numbreid, on =SEQUENCE(COLUMNS(ListSheets)) isegi dünaamiline.

  13. 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!

  14. 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

  15. Tänan, kuidas ma saan juba olemasoleva vahekaardi "Tab Index" praeguses failis olevad tulemused veel paremini tabelisse väljastada?

  16. Saan veateate #BLOCKED! kui proovin meetodit 2 (loetelu koos valemiga). Soovin kasutada oma töövihikus lehe nime, nii et VBA-meetodist pole abi.

  17. 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)

  18. 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 🙂

Jäta vastus

Sinu e-postiaadressi ei avaldata. Kohustuslikud väljad on märgitud *