Kuidas eemaldada Exceli lehed: näidata mitut või kõiki peidetud lehte

  • Jaga Seda
Michael Brown

Õpetuses selgitatakse, kuidas Exceli 2016, 2013, 2010 ja madalamates versioonides töölehti katmata jätta. Saate teada, kuidas töölehti kiiresti katmata jätta, tehes paremklõpsu ja kuidas VBA-koodiga korraga kõiki lehti katmata jätta.

Kujutage ette järgmist: te avate töölehe ja märkate, et mõned valemid viitavad teisele töölehele. Te vaatate lehe vahekaardid, kuid viidatud töölehte ei ole seal! Te proovite luua uue sama nimega lehe, kuid Excel ütleb teile, et see on juba olemas. Mida see kõik tähendab? Lihtsalt, tööleht on peidetud. Kuidas Excelis peidetud lehti vaadata? Ilmselt tuleb need lahti peidata. Seda saab teha järgmiselt.käsitsi, kasutades Exceli Unhide käsuga või automaatselt VBA abil. See õpetus õpetab teile mõlemat meetodit.

    Kuidas Exceli lehed eemaldada

    Kui soovite näha vaid ühte või kahte peidetud lehte, saate need kiiresti eemaldada:

    1. Tehke Exceli töövihikus paremklõps suvalisel lehe vahekaardil ja valige Unhide ... kontekstmenüüst.
    2. In the Unhide kastis, valige peidetud leht, mida soovite kuvada, ja klõpsake nuppu OK (või topeltklõpsake lehe nimele). Valmis!

    Lisaks paremkliki kontekstmenüüle on võimalik kasutada ka funktsiooni Unhide dialoogile pääseb paelalt juurde:

    • Excel 2003 ja varasemates programmides klõpsake nuppu Formaat menüü ja seejärel klõpsake Leht > Unhide .
    • Excel 2016, Excel 2013, Excel 2010 ja Excel 2007, minge aadressile Kodu tab> Rakud gruppi ja klõpsake nuppu Formaat Veebilehel Nähtavus , osutavad Peida &; Peida lahti ja seejärel klõpsake Unhide Sheet ...

    Märkus. Exceli Unhide valik võimaldab valida ainult ühe lehe korraga. Mitme lehe peitmise eemaldamiseks peate kordama ülaltoodud samme iga töölehe jaoks eraldi või saate eemaldada kõik lehed korraga, kasutades allpool toodud makroid.

    Kuidas Exceli lehed VBAga lahti võtta

    Olukordades, kus teil on mitu peidetud töölehte, võib nende ükshaaval peitmise tühistamine olla väga aeganõudev, eriti kui soovite eemaldada kõik oma töövihiku lehed. Õnneks saate protsessi automatiseerida ühe järgneva makroga.

    Kuidas eemaldada kõik Exceli lehed

    See väike makro muudab kõik aktiivse töövihiku varjatud lehed korraga nähtavaks, ilma et teid häiriksid teated.

    Sub Unhide_All_Sheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub

    Näita kõiki peidetud lehed ja kuvada nende arv

    Nagu eespool kirjeldatud makro, näitab ka see makro kõik töövihiku peidetud lehed. Erinevus seisneb selles, et pärast lõpetamist kuvatakse dialoogiboks, mis teatab kasutajale, mitu lehte on peidetud:

    Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If wks.Visible xlSheetVisible Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " töölehed on peidetud." , vbOKOnly, "Unhiding worksheets" Else MsgBox "Ei leitud peidetud töölehti." , vbOKOnly,"Unhiding worksheets" End If End Sub

    Mitme valitud lehe peitmise tühistamine

    Kui te ei soovi kõiki töölehti korraga lahti teha, vaid ainult neid, mille nähtavaks tegemisega kasutaja selgesõnaliselt nõustub, siis laske makroil küsida iga peidetud lehe kohta eraldi, näiteks nii:

    Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult For Each wks In ActiveWorkbook.Worksheets If wks.Visible = xlSheetHidden Then MsgResult = MsgBox( "Unhide sheet " & wks.Name & "?" , vbYesNo, "Unhiding worksheets" ) If MsgResult = vbYes Then wks.Visible = xlSheetVisible End If Next End Sub

    Töölehtede peitmise tühistamine, mille lehe nimes on konkreetne sõna

    Olukordades, kus soovite eemaldada ainult need lehed, mille nimes on teatud tekst, lisage makrosse IF-lause, mis kontrollib iga peidetud töölehe nime ja eemaldab ainult need lehed, mis sisaldavad teie poolt määratud teksti.

    Selles näites eemaldame lehed sõnaga " aruanne " nimes. Makro kuvab selliseid lehti nagu Aruanne , Aruanne 1 , Juuli aruanne jms.

    Selleks, et eemaldada töölehed, mille nimi sisaldab mõnda muud sõna, asendage " aruanne " järgmises koodis oma tekstiga.

    Sub Unhide_Sheets_Contain() Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If (wks.Visible xlSheetVisible) And (InStr(wks.Name, "report" )> 0) Then wks.Visible = xlSheetVisible count = count + 1 End If Next wks If count> 0 Then MsgBox count & " töölehti on peidetud lahti." , vbOKOnly, "Unhiding worksheets" Else MsgBox "No hiddenmääratud nimega töölehed on leitud." , vbOKOnly, "Unhiding worksheets" End If End Sub

    Kuidas kasutada makrosid Exceli lehtede varjamise tühistamiseks

    Makrode kasutamiseks oma töölehel saate kas kopeerida/liita koodi Visual Basic'i redaktorisse või laadida alla makroid sisaldava töövihiku ja käivitada need sealt.

    Kuidas sisestada makro oma töövihikusse

    Selliselt saate lisada oma töövihikusse mis tahes eespool nimetatud makrosid:

    1. Avage peidetud lehtedega töövihik.
    2. Vajutage Alt + F11, et avada Visual Basic'i redaktor.
    3. Klõpsake vasakul paanil paremklõpsuga ThisWorkbook ja valige Sisesta > Moodul kontekstmenüüst.
    4. Sisestage kood koodide aknasse.
    5. Makro käivitamiseks vajutage F5.

    Üksikasjalikud samm-sammulised juhised leiate jaotisest Kuidas sisestada ja käivitada VBA-koodi Excelis.

    Laadige alla makrode sisaldav töövihik

    Alternatiivina saate alla laadida meie näidistöövihiku Exceli lehtede varjamise eemaldamiseks, mis sisaldab kõiki selles õpetuses käsitletud makrosid:

    • Unhide_All_Sheets - aktiivse töövihiku kõigi töölehtede peitmise hetkeks ja vaikselt lahti.
    • Unhide_All_Sheets_Count (kõik_lehed_tahvlid_tahvlite_arv) - näidata kõiki peidetud lehed koos nende arvuga.
    • Unhide_Selected_Sheets - kuvada peidetud lehed, mille soovite eemaldada.
    • Unhide_Sheets_Contain - peidab ära töölehed, mille nimed sisaldavad kindlat sõna või teksti.

    Makrode käivitamiseks Excelis teete järgmist:

    1. Avage allalaaditud töövihik ja lubage makrosid, kui seda nõutakse.
    2. Avage oma töövihik, milles soovite näha varjatud lehti.
    3. Vajutage oma töövihikus Alt + F8 , valige soovitud makro ja klõpsake nuppu Käivita .

    Näiteks, et eemaldada kõik Exceli faili lehed ja kuvada peidetud lehtede arv, käivitate selle makro:

    Kuidas näidata Exceli varjatud lehti, luues kohandatud vaate

    Peale makrode saab peidetud töölehtede ükshaaval näitamise tüütusest üle saada, kui luua kohandatud vaade. Kui te ei ole selle Exceli funktsiooniga tuttav, siis võite mõelda kohandatud vaate all oma töövihiku seadete hetkeseisu, mida saab igal hetkel ühe hiireklikiga rakendada. Seda meetodit on kõige parem kasutada kohe töö alguses, kui ükski leht pole veel peidetud.

    Niisiis, mida me nüüd teeme, on luua Näita kõiki lehti kohandatud vaade:

    1. Veenduge, et kõik teie töövihikus olevad töölehed on nähtav See näpunäide näitab, kuidas kiiresti kontrollida töövihikut peidetud lehtede suhtes.
    2. Minge Vaata tab> Töövihiku vaated gruppi ja klõpsake nuppu Kohandatud vaated nupp.

  • The Kohandatud vaade ilmub dialoogiboks ja te vajutate Lisa...
  • aastal Lisa vaade dialoogiaknas sisestage oma kohandatud vaate nimi, näiteks ShowAllSheets ja klõpsake OK.
  • Nüüd saate nii palju töölehti peita kui soovite, ja kui soovite need uuesti nähtavaks teha, klõpsate nupule Kohandatud vaated nuppu, valige ShowAllSheet vaadata ja klõpsata Näita , või lihtsalt topeltklõpsake vaates.

    See on kõik! Kõik varjatud lehed kuvatakse kohe.

    Kuidas kontrollida, kas töövihik sisaldab varjatud lehti

    Kõige kiirem viis Exceli varjatud lehtede tuvastamiseks on järgmine: klõpsake paremal klahviga mis tahes lehe vahekaardil ja vaadake, kas Peida... käsk on lubatud või mitte. Kui see on lubatud, klõpsake sellel ja vaadake, millised lehed on peidetud. Kui see on keelatud (hallis), ei sisalda töövihik peidetud lehti.

    Märkus. See meetod ei näita väga peidetud lehed. Ainus viis selliste lehtede vaatamiseks on need VBA abil lahti peidata.

    Exceli lehed ei saa eemaldada - probleemid ja lahendused

    Kui te ei saa oma Excelis teatud lehed lahti võtta, võivad järgmised tõrkeotsingu nõuanded valgustada, miks.

    1. Töövihik on kaitstud

    Lehtede peitmine või peitmata jätmine ei ole võimalik, kui töövihiku struktuur on kaitstud (ei tohi segi ajada töövihiku tasandi parooliga krüpteerimise või töölehe kaitsega). Selle kontrollimiseks minge aadressile Ülevaade tab> Muudatused gruppi ja vaadake Kaitse töövihik nupp. Kui see nupp on roheliselt esile tõstetud, on töövihik kaitstud. Selle kaitsmise tühistamiseks klõpsake nuppu Kaitse töövihik nuppu, sisestage parool, kui seda küsitakse, ja salvestage töövihik. Lisateavet leiate jaotisest Kuidas avada kaitstud töövihik Excelis.

    2. Töölehed on väga peidetud

    Kui teie töölehed on peidetud VBA-koodiga, mis muudab need väga peidetuks (määrab xlSheetVeryHidden omadus), ei saa selliseid töölehti kuvada, kui kasutada funktsiooni Unhide käsk. Väga peidetud lehtede peitmise tühistamiseks tuleb muuta omadust xlSheetVeryHidden aadressile xlSheetVisible Visual Basic'i redaktorist või käivitage see VBA-kood.

    3. Töövihikus ei ole varjatud lehti

    Kui Unhide käsk on nii ribalindil kui ka parema hiireklõpsu menüüs hallis, see tähendab, et teie töövihikus ei ole ühtegi peidetud lehte :)

    Niimoodi saate Exceli lehtede peitmise eemaldada. Kui olete uudishimulik teada, kuidas teisi objekte, näiteks ridu, veerge või valemeid, peita või eemaldada, leiate kõik üksikasjad allpool olevatest artiklitest. Tänan teid lugemise eest ja loodan, et näeme teid järgmisel nädalal meie blogis!

    Saadaolevad allalaadimised

    Makros Exceli töölehtede varjamise tühistamiseks

    Michael Brown on pühendunud tehnoloogia entusiast, kelle kirg on tarkvaratööriistade abil keerukate protsesside lihtsustamine. Rohkem kui kümneaastase kogemusega tehnoloogiatööstuses on ta lihvinud oma oskusi Microsoft Excelis ja Outlookis, samuti Google Sheetsis ja Docsis. Michaeli ajaveebi eesmärk on jagada oma teadmisi ja teadmisi teistega, pakkudes hõlpsasti järgitavaid näpunäiteid ja õpetusi tootlikkuse ja tõhususe parandamiseks. Olenemata sellest, kas olete kogenud professionaal või algaja, pakub Michaeli ajaveebi väärtuslikke teadmisi ja praktilisi nõuandeid nende oluliste tarkvaratööriistade maksimaalseks kasutamiseks.