Kaip atskleisti lapus „Excel“ (viskas vienu metu)

Žiūrėkite vaizdo įrašą - kaip atskleisti visus „Excel“ lapus

Jei norite skaityti vadovėlį, o ne žiūrėti vaizdo įrašą, toliau pateikiama išsami rašytinė pamoka apie „Excel“ lapų slėpimą.

Kai dirbate su duomenimis, paskirstytais keliuose „Excel“ darbalapiuose, galbūt norėsite paslėpti kelis darbalapius. Tai gali būti išvengta netvarkos arba nerodyti kai kurių duomenų savo klientui/valdytojui, paslėpiant kai kuriuos darbalapius ir matant tik naudingus.

Kai kuriais atvejais galite turėti darbaknygę, kurioje yra paslėptų lapų, ir norite atskleisti kai kuriuos arba visus šiuos darbalapius.

Šioje pamokoje parodysiu kai kuriuos metodus, kaip atskleisti darbalapius „Excel“ (rankiniu būdu ir automatiškai naudojant VBA). Taip pat parodysiu, kaip pasirinktinai rodyti darbalapius pagal pavadinimą ar sąlygą.

Taigi pradėkime!

Lakštų slėpimas rankiniu būdu

Jei turite tik kelis paslėptus darbalapius, galite rankiniu būdu rodyti kai kuriuos arba visus šiuos darbalapius.

Tarkime, kad turite „Excel“ darbaknygę, kurioje yra 10 paslėptų darbalapių.

Toliau pateikiami veiksmai, kaip rankiniu būdu rodyti darbalapius (po vieną):

1. Dešiniuoju pelės mygtuku spustelėkite bet kurį esamą darbalapio skirtuką
2. Spustelėkite parinktį Nerodyti. Bus atidarytas dialogo langas Nerodyti, kuriame išvardyti visi paslėpti darbalapiai
3. Dialogo lange Nerodyti spustelėkite darbalapį, kurį norite slėpti (galite pasirinkti tik vieną).
4. Spustelėkite Gerai.

Pirmiau minėti veiksmai parodys pasirinktą darbalapį.

Pastaba: Deja, „Excel“ nėra integruotos funkcijos, leidžiančios greitai atskleisti visus paslėptus darbalapius (arba būdas pasirinkti daugiau nei vieną darbalapį ir jį atskleisti). Nuo šiol turite naudoti dialogo langą „Rodyti slėpimą“, kuriame galite pasirinkti tik vieną darbalapį, kurį norite slėpti.

Galite masiškai paslėpti darbalapius, bet neatskleisti jų masiškai

Jei norite paslėpti darbalapius, galite pasirinkti kelis darbalapius vienu metu (laikykite nuspaudę valdymo klavišą ir spustelėkite darbalapio skirtuko pavadinimą), dešiniuoju pelės mygtuku spustelėkite ir spustelėkite parinktį Slėpti.

Deja, „Excel“ nėra integruotos funkcijos, leidžiančios greitai atskleisti visus paslėptus darbalapius (arba būdas pasirinkti daugiau nei vieną darbalapį ir jį atskleisti). Nuo šiol turite naudoti dialogo langą „Rodyti slėpimą“, kuriame galite pasirinkti tik vieną darbalapį, kurį norite slėpti.

Nors nėra integruotų funkcijų, kurias galima būtų rodyti masiškai, tai galite lengvai padaryti naudodami paprastą VBA makro kodą.

Slėpti visus lapus vienu metu

Naudodami VBA galite lengvai atskleisti masinius darbalapius.

Pvz., Jei turite 10 paslėptų darbalapių, galite sukurti paprastą VBA kodą, kad būtų rodomi visi darbalapiai, arba galite slėpti pagal sąlygą (pvz., Rodyti tik tuos, kurių pavadinime yra konkretus priešdėlis arba metai).

Pastaba: šiame vadove aprašyti metodai nereikalauja, kad norint naudoti VBA kodą, reikia išsaugoti „Excel“ darbaknygę makrokomandų formatu (.XLSM).

Naudojant „Momentinį langą“

VB redaktorius „Excel“ turi tiesioginį langą, kuriame galite įvesti kodo eilutę ir nedelsdami ją vykdyti.

Žemiau pateikiami veiksmai, kaip naudoti šią aukščiau esančią kodo eilutę, kad būtų rodomi lapai per tiesioginį langą:

1. Dešiniuoju pelės mygtuku spustelėkite bet kurį matomą darbo knygos lapą
2. Spustelėkite Peržiūrėti kodą. Tai atidarys VB redaktorių.
3. Meniu spustelėkite parinktį Rodinys, tada spustelėkite langą Neatidėliotinas. Taip VB redaktoriuje atsiras langas „Neatidėliotinas“ (jei jo dar nėra).
4. Atsidariusiame lange nukopijuokite ir įklijuokite šią kodo eilutę: Kiekvienam šios darbo knygos lapui. Lakštai: lapas. Matomas = tiesa: kitas lapas
5. Padėkite žymeklį eilutės pabaigoje
6. Paspauskite klavišą Enter

Viskas!

Pirmiau minėti veiksmai iškart atskleis visus darbo knygos lapus.

Baigę galite uždaryti VB redaktorių.

Geriausia yra tai, kad tai galite padaryti bet kurioje darbo knygoje. Nereikia jaudintis dėl darbaknygės išsaugojimo makrokomandų formatu. Tiesiog vykdykite kodo eilutę ir iš karto atskleiskite visus darbaknygės lapus.

Taip pat leiskite greitai paaiškinti žemiau esantį VBA kodą, kurį naudojome tiesioginiame lange, norėdami atskleisti lapus:

Kiekvienam šios darbo knygos lapui. Lakštai: lapas. Matomas = tiesa: kitas lapas

Aukščiau pateiktas kodas naudoja „For Next VBA“ kilpą, kad pereitų visus darbaknygės lapus ir nustatytų matomą ypatybę TRUE. Pakeitus matomą visų lapų ypatybę, kodas pasibaigs.

Dvitaškis (:), naudojamas aukščiau esančiame kode, atitinka eilutės lūžį. Nors atrodo kaip viena kodo eilutė, ją sudaro trys dalys, atskirtos dviem dvitaškiais.

Jei norite sužinoti daugiau apie tiesioginį langą ir keletą nuostabių dalykų, kuriuos galite padaryti su juo, čia yra išsami pamoka apie tai.

Pridėjus makrokomandą prie QAT (vienu paspaudimu)

Jei gana dažnai turite slėpti darbalapius, kitas geras būdas gali būti makrokomandos kodas, skirtas asmeninių makrokomandų darbaknygės lapų slėpimui ir piktogramos išsaugojimas sparčiosios prieigos įrankių juostoje.

Tai tik vienkartinis procesas, kurį atlikę galite bet kurioje darbaknygėje rodyti lapus, tiesiog spustelėdami mygtuką QAT.

Tai yra pats efektyviausias būdas atskleisti „Excel“ lapus (naudingiausia, kai gausite daug darbaknygių su paslėptais lapais ir turite juos slėpti).

Apgaulė yra išsaugoti kodą, kad būtų rodomi asmeninės makrokomandos darbaknygės lapai.

Asmeninė makrokomandos darbaknygė yra tai, kas visada atidaroma, kai atidarote bet kurį „Excel“ failą (tačiau jo nematote). Išsaugojus makrokomandos kodą asmeninės makrokomandos darbaknygėje, šis kodas jums visada prieinamas. Kai pridėsite tai prie QAT ir paleisite makro kodą vienu paspaudimu.

Žemiau yra kodas, kurį turite pridėti prie asmeninės makrokomandos darbaknygės:

Sub UnhideAllSheets () kiekvienam Sheets Sheet Sheet lapui. Visible = True Next Sheet End Sub

Toliau pateikiami žingsniai, kaip šį kodą pridėti prie asmeninės makrokomandos darbaknygės:

1. Spustelėkite įrašymo makrokomandos mygtuką (jis yra „Excel“ darbaknygės programos apačioje kairėje)
2. Dialogo lange Įrašyti makrokomandą pakeiskite makrokomandos parduotuvės nustatymą į - Asmeninė makrokomandos darbaknygė.
3. Spustelėkite Gerai. Tai pradės įrašyti makrokomandą
4. Spustelėkite piktogramą Sustabdyti makrokomandos įrašymą (apatinėje kairėje darbaknygės pusėje). Tai sustabdys makrokomandų įrašymą
5. Dešiniuoju pelės mygtuku spustelėkite bet kurį lapo skirtuką, tada spustelėkite „Peržiūrėti kodą“
6. VB redaktoriuje dukart spustelėkite „Personal.XLSB“ darbaknygės objektą „Module“
7. Pašalinkite esamą kodą ir nukopijuokite bei įklijuokite aukščiau pateiktą kodą.
8. Įrankių juostoje spustelėkite piktogramą Išsaugoti
9. Uždarykite Vb redaktorių

Pirmiau minėti veiksmai leidžia jums padaryti asmeninės makrokomandos darbaknygę matomą VB redaktoriuje ir įdėti kodą, kad jame nebūtų rodomi lapai.

Dabar tereikia pridėti šį kodą prie greitos prieigos įrankių juostos, kad galėtumėte jį naudoti bet kuriuo metu iš bet kurios darbaknygės.

Toliau pateikiami žingsniai, kaip šį kodą pridėti prie greitos prieigos įrankių juostos:

1. Spustelėkite piktogramą Tinkinti greitos prieigos įrankių juostą.
2. Spustelėkite Daugiau komandų.
3. Dialogo lange „Excel“ parinktys spustelėkite išskleidžiamąjį meniu „Pasirinkti komandas“
4. Spustelėkite „Makrokomandos“. Tai parodys visų darbaknygės makrokomandų sąrašą (įskaitant PERSONAL.XLSB)
5. Pasirinkite makro kodą, kad būtų rodomi lapai
6. Spustelėkite mygtuką Pridėti
7. Spustelėkite Gerai.

Atliekant aukščiau nurodytus veiksmus, šis makrokomandos kodas bus pridėtas prie lapų rodymo sparčiosios prieigos įrankių juostoje.

Dabar, kai tik gausite darbaknygę, kurioje yra paslėpti kai kurie lapai, jums tiesiog reikia spustelėti kodo piktogramą QAT ir ji iškart parodys visus lapus vienu ypu.

Pavadinime rodyti lapus su konkrečiu tekstu

Naudodami VBA taip pat galite atskleisti lapus pagal pavadinimą.

Pvz., Tarkime, kad turite darbaknygę, kurioje yra lapai su metų pavadinimais, ir norite rodyti visus tuos, kuriuose yra 2021–2022 metai.

Galite naudoti toliau pateiktą kodą, kad būtų parodyti visi lapai, kuriuose yra tekstas2021-2022:

Antraštė UnhideSheetsWithSpecificText () Kiekvienam šio darbo knygos ws

Anksčiau naudojama ciklas „Kitas“, kad būtų galima peržiūrėti kiekvieną darbaknygės darbalapį. Sąlyga IF Tada patikrina darbalapio pavadinimą ir, jei jame yra nurodytas tekstas (kuris šiame kode yra 2021–2022), ji pakeis matomą savybę, kad ji būtų matoma.

Ir jei pavadinime nėra nurodyto teksto, jis paliks jį tokį, koks yra.

Taip pat galite modifikuoti šį kodą, kad paslėptumėte lapus pagal pavadinimo tekstą.

Pavyzdžiui, jei norite greitai paslėpti visus darbalapius, kurių pavadinime yra tekstas „2020“, galite naudoti žemiau esantį kodą:

Sub HideSheetsWithSpecificText () Kiekvienam šios darbo knygos ws. Darbo lapai Jei InStr (ws.Name, "2020")> 0 Tada ws.Visible = xlSlėpta pabaiga, jei kita ws pabaiga

Pastaba: Šį kodą galite išsaugoti įprastu moduliu VB redaktoriuje arba asmeninėje makrokomandos darbaknygėje. Jei išsaugosite jį įprastame modulyje ir vėliau vėl turėsite jį naudoti, turite įrašyti darbaknygę kaip makrokomandą turinčią darbaknygę (.XLSM formatas).

Rodyti pasirinktus lapus (pagal naudotojo pasirinkimą)

Taip pat galite naudoti VBA, kad suteiktumėte vartotojui galimybę pasirinkti, ar rodyti lapą, ar ne.

Tai galima padaryti parodžius pranešimų laukelį, kuriame prašoma vartotojo pasirinkti, ar rodyti lapą, ar ne. Jei pasirinkta, jis atskleidžia tą lapą, kitu atveju jis pereina prie kito.

Žemiau yra kodas, kuris tai padarys:

Sub UnhideSheetsUserSelection () Kiekvienai sh šioje „Darbo knygoje“. Lakštai Jei sh.Visible True Tada Result = MsgBox („Ar norite atskleisti“ & sh.Name, vbYesNo) If Result = vbYes Tada sh.Visible = Tikra pabaiga Jei kita sh pabaiga Sub

Aukščiau pateiktas kodas eina per kiekvieną darbo knygos lapą ir patikrina, ar jis jau matomas, ar ne. Jei jis paslėptas, rodomas pranešimų langas su darbalapio pavadinimu.

Dabar kaip vartotojas galite nuspręsti, ar norite, kad šis lapas būtų paslėptas, ar nepaslėptas.

Tai gali veikti gerai, jei turite paslėptus darbalapius ir norite skambinti už kiekvieną lapą atskirai.

Pastaba: Šį kodą galite išsaugoti įprastu moduliu VB redaktoriuje arba asmeninėje makrokomandos darbaknygėje. Jei išsaugosite jį įprastame modulyje ir vėliau vėl turėsite jį naudoti, turite įrašyti darbaknygę kaip makrokomandą turinčią darbaknygę (.XLSM formatas).

Čia yra pamoka, kurioje parodysiu, kaip išsaugoti kodą įprastame „Excel“ modulyje (ieškokite šio straipsnio skilties „Kur įdėti šį kodą“)

Rodyti visus arba pasirinktus lapus naudojant pasirinktinį vaizdą

Tai yra mažiau žinomas metodas, jei norite greitai atskleisti visus darbalapius (arba kai kuriuos pasirinktus darbalapius).

„Pasirinktinis vaizdas“ yra „Excel“ funkcija, leidžianti sukurti ir išsaugoti rodinius, kuriuos galite greitai pasiekti vienu mygtuko paspaudimu.

Pvz., Tarkime, kad turite „Excel“ darbaknygę su 10 darbalapių. Galite sukurti vaizdą, kuriame matomi visi šie 10 lapų. Ateityje, jei turite paslėptų lapų ir norite grįžti į rodinį, kuriame buvo matomi visi lapai, tai galite padaryti pasirinkę jau išsaugotą pasirinktinį vaizdą.

Nesijaudinkite, sukūrę pasirinktinį rodinį neprarasite jokių pakeitimų. Viskas, ką daro pasirinktinis vaizdas, grąžina jus į „Excel“ rodinį, kai jį sukūrėte. Taigi, jei kai kurie darbalapiai buvo matomi kuriant rodinį ir dabar yra paslėpti, pasirinkus šį pasirinktinį rodinį šie lapai bus rodomi.

Tinkintas rodinys skirtas naudotojams kurti skirtingus rodinius. Pvz., Jei esate analitikas, galite sukurti skirtingus rodinius skirtingiems organizacijos padaliniams. Taigi galite matyti konkretų darbalapių rinkinį (arba langelius/eilutes/stulpelius) vienam skyriui, o kitą - kitam skyriui. Kai turėsite šiuos rodinius, užuot tai pakeitę rankiniu būdu, jūs tiesiog suaktyvinsite skyriaus rodinį ir jame bus rodomi tik jiems svarbūs darbalapiai (arba eilutės/stulpeliai).

Toliau pateikiami veiksmai, kaip sukurti pasirinktinį rodinį „Excel“:

1. Pirmiausia slėpkite visus darbalapius
2. Spustelėkite skirtuką Rodinys
3. Spustelėkite pasirinktinius rodinius
4. Pasirinktinių rodinių dialogo lange spustelėkite Pridėti. Bus atidarytas dialogo langas Pridėti rodinį
5. Įveskite bet kokį šio rodinio pavadinimą, kuriame matomi visi lapai (arba pasirinkti lapai)
6. Spustelėkite Gerai.

Sukūrę rodinį, bet kuriuo metu galite paprašyti „Excel“ suaktyvinti šį rodinį (taip būtų matomi visi tie lapai, kurie buvo matomi kuriant rodinį).

Toliau pateikiami tinkinto rodinio rodymo/aktyvinimo veiksmai:

1. Spustelėkite skirtuką Rodinys
2. Spustelėkite pasirinktinius rodinius
3. Dialogo lange Pasirinktiniai vaizdai pasirinkite rodinį, kurį norite rodyti
4. Spustelėkite mygtuką Rodyti

Tai akimirksniu parodytų lapus ir parodytų tuos, kurie buvo matomi kuriant tą pasirinktinį vaizdą.

„Labai paslėptų“ lapų slėpimas

Kartais, nepaisant to, kad jūsų darbaknygėje yra paslėptų lapų, negalėsite jos rodyti rankiniu būdu.

Taip gali būti todėl, kad šie lapai nėra tik paslėpti - jie yra „labai paslėpti“.

Kai darbo knygoje turite paslėptų lapų ir dešiniuoju pelės mygtuku spustelėkite bet kurio skirtuko pavadinimą, pamatysite parinktį „Rodyti lapus“. Bet jei lapai yra „labai paslėpti“ arba jei nėra paslėptų lapų, negalėsite naudoti šios parinkties (ji bus pilka).

Jūs vis dar galite atskleisti šiuos „labai paslėptus“ lapus naudodami VBA kodą, kurį aprašėme aukščiau.

Tiesiog nukopijuokite ir įklijuokite žemiau esantį kodą į tiesioginį langą ir paspauskite „Enter“, ir jis iškart parodys visus lapus (paslėptus ir labai paslėptus).

Kiekvienam šios darbo knygos lapui. Lakštai: lapas. Matomas = tiesa: kitas lapas

Taip pat turiu visą pamoką, kaip paslėpti lapus ir padaryti juos labai paslėptus (jei jus domina mokymasis)