Satura rādītājs
Šajā pamācībā ir izskaidrota atšķirība starp slēptajām un ļoti slēptajām loksnēm, izskaidrots, kā padarīt darblapu ļoti slēptu un kā skatīt ļoti slēptās lapas programmā Excel.
Vai esat satraukts, jo nevarat atrast izklājlapu, uz kuru attiecas viena no jūsu formulām? Šī lapa nav redzama starp citām cilnēm darbgrāmatas apakšdaļā, kā arī tā nav redzama sadaļā Atslēpt dialoglodziņš. Kur gan šī lapa varētu būt? Vienkārši, tā ir ļoti paslēpta.
Kas ir ļoti slēpta darblapa programmā Excel?
Kā visi zina, Excel lapu var redzēt vai paslēpt. Patiesībā ir divi darblapas slēpšanas līmeņi: slēptā un ļoti slēpts .
Normāli paslēptas lapas atslēpšana ir ļoti vienkārša. Viss, kas jums jādara, ir jānoklikšķina ar peles labo pogu uz jebkuras redzamās darblapas, jānoklikšķina uz Atslēpt , un izvēlieties lapu, kuru vēlaties apskatīt. Ļoti slēptas lapas ir cits gadījums. Ja darbgrāmatā ir tikai ļoti slēptas lapas, jūs pat nevarēsiet atvērt lapu Atslēpt dialoglodziņš, jo Atslēpt Ja darbgrāmatā ir gan slēptas, gan ļoti slēptas lapas, komanda būs atspējota. Atslēpt dialogs būs pieejams, bet ļoti slēptās lapas tur nebūs uzskaitītas.
Kā tehniski Excel nošķir slēptās un ļoti slēptās darblapas? Ar Redzams lapas īpašība, kurai var būt viena no šīm vērtībām:
- xlSheetVisible (vai TRUE) - lapa ir redzama
- xlSheetHidden (vai FALSE) - lapa ir paslēpta
- xlSheetVeryHidden - lapa ir ļoti slēpta
Lai gan ikviens var pārslēgt starp TRUE (redzams) un FALSE (slēpts), izmantojot Excel funkciju Atslēpt vai Paslēpt komandām. xlVeryHidden vērtību var iestatīt tikai no Visual Basic redaktora.
No lietotāja viedokļa, kāda ir atšķirība starp slēptajām un ļoti slēptajām lapām? Tas ir vienkārši šādi: ļoti slēptu lapu nevar padarīt redzamu, izmantojot Excel lietotāja interfeisu, vienīgais veids, kā to noslēpt, ir ar VBA. Tātad, ja vēlaties, lai dažas no jūsu darblapām būtu daudz grūtāk noslēpt citām personām (piemēram, tās, kurās ir sensitīva informācija vai starpposma formulas), izmantojiet šo augstāko līmeni.loksnes slēpšanas līmeni un padarīt tos ļoti slēptus.
Kā padarīt Excel darblapas ļoti slēptas
Kā jau minēts, vienīgais veids, kā lapu padarīt ļoti slēptu, ir, izmantojot Visual Basic redaktoru. Atkarībā no tā, cik lapas vēlaties paslēpt, varat izmantot kādu no turpmāk minētajām metodēm.
Padariet darblapu ļoti slēptu, mainot tās īpašību Redzams
Ja vēlaties pilnībā paslēpt tikai vienu vai divas lapas, varat mainīt Redzams katras lapas īpašību manuāli. Lūk, kā:
- Nospiediet Alt + F11 vai noklikšķiniet uz Visual Basic pogu uz Izstrādātājs Tas atvērs Visual Basic redaktoru, kura augšējā kreisajā panelī atrodas logs Project Explorer (Projekta pārlūks), kurā redzams visu atvērto darbgrāmatu un to lapu koks.
- Nospiediet F4 vai noklikšķiniet uz Skatīt > Īpašības . Tas liks Īpašības logu, kas parādās tieši zem Project Explorer (lūdzu, skatiet zemāk redzamo ekrānattēlu). Īpašības logs jau ir, izlaidiet šo soli :)
- Projekta Explorer logā noklikšķiniet uz darblapas, kuru vēlaties padarīt ļoti slēptu, lai to atlasītu.
- In the Īpašības logā iestatiet Redzams īpašumu uz 2 - xlSheetVeryHidden .
Un viss! Tiklīdz Redzams īpašība ir mainīta, attiecīgās lapas cilne pazudīs no darbgrāmatas apakšdaļas. Vajadzības gadījumā atkārtojiet iepriekš minētās darbības ar citām lapām un pēc tam aizveriet Visual Basic redaktora logu.
Padariet aktīvo darblapu ļoti slēptu ar VBA kodu
Ja jums regulāri ir jāslēpj lapas un jūs kaitina, ka tas jādara manuāli, varat automatizēt šo darbu, izmantojot vienu koda rindu. Šeit ir makro, kas padara aktīvu darblapu ļoti slēptu:
Sub VeryHiddenActiveSheet() ActiveSheet.Visible = xlSheetVeryHidden End SubJa rakstāt makro citu lietotāju vajadzībām, iespējams, vēlēsieties rūpēties par situācijām, kad darbgrāmatā ir tikai viena redzamā lapa. Kā jūs, iespējams, atceraties, nav iespējams paslēpt pilnīgi visas darblapas Excel failā (neatkarīgi no tā, vai tās ir slēptas vai ļoti slēptas), vismaz vienai lapai ir jāpaliek redzamai. Tātad, lai brīdinātu lietotājus par šo ierobežojumu, ietiniet iepriekš minēto makro Kļūdas gadījumā šāds bloks:
Sub VeryHiddenActiveSheet() On Error GoTo ErrorHandler ActiveSheet.Visible = xlSheetVeryHidden Exit Sub ErrorHandler : MsgBox "A workbook must contain at least one visible worksheet." , vbOKOnly, "Unable to Hide Worksheet" End SubPadariet vairākas darblapas ļoti slēptas, izmantojot VBA kodu
Ja vēlaties iestatīt visas atlasītās lapas būt ļoti paslēptas, pāriet pa kārtām pa visām aktīvās darbgrāmatas (ActiveWindow) atlasītajām lapām un mainiet tās. Redzams īpašumu uz xlSheetVeryHidden .
Sub VeryHiddenSelectedSheets() Dim wks As Worksheet On Error GoTo ErrorHandler For Each wks In ActiveWindow.SelectedSheets wks.Visible = xlSheetVeryHidden Next Exit Sub ErrorHandler : MsgBox "A workbook must contain at least one visible worksheet." , vbOKOnly, "Unable to Hide Worksheets" End SubKā Excel programmā Excel atslēpt ļoti slēptas lapas
Tagad, kad zināt, kā pilnībā paslēpt lapas programmā Excel, ir pienācis laiks pastāstīt par to, kā varat skatīt ļoti paslēptas lapas.
Ļoti slēptas darblapas atsegšana, mainot tās īpašību Redzams
Lai atkal varētu redzēt ļoti slēptu darblapu, jums vienkārši jāmaina tās Redzams īpašumu atpakaļ uz xlSheetVisible .
- Nospiediet Alt + F11, lai atvērtu Visual Basic redaktoru.
- In the VBAProjekts logā atlasiet darblapu, kuru vēlaties paslēpt.
- In the Īpašības logā iestatiet Redzams īpašumu uz -1 - xlSheetVisible .
Paveikts!
Atbloķēt visas ļoti slēptās lapas, izmantojot VBA
Ja jums ir diezgan daudz ļoti paslēptu lapu un vēlaties, lai tās visas atkal būtu redzamas, šis makroprogramma darbosies lieliski:
Sub UnhideVeryHiddenSheets() Dim wks As Worksheet For Each wks In Worksheets If wks.Visible = xlSheetVeryHidden Then wks.Visible = xlSheetVisible Next End SubPiezīme. Šis makro tikai atmasko ļoti slēptās loksnes , nevis darblapas, kas parasti ir paslēptas. Ja vēlaties parādīt pilnīgi visas paslēptās lapas, izmantojiet tālāk norādīto.
Atslēpt visas slēptās un ļoti slēptās lapas vienlaicīgi
Lai vienā reizē parādītu visas aktīvās darbgrāmatas slēptās lapas, vienkārši iestatiet Redzams katras lapas īpašība ir TRUE vai xlSheetVisible .
Sub UnhideAllSheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub SubKā lietot ļoti slēpto lapu makrouzdevumus
Lai Excel darbgrāmatā ievietotu jebkuru no iepriekš minētajiem makrouzdevumiem, veiciet šādas parastās darbības:
- Atveriet darbgrāmatu, kurā vēlaties paslēpt vai atslēpt lapas.
- Nospiediet Alt + F11, lai atvērtu Visual Basic redaktoru.
- Kreisajā logā ar peles labo pogu noklikšķiniet uz Šīdarbgrāmata un izvēlieties Ievietot > Modulis no konteksta izvēlnes.
- Ievietojiet kodu logā Kods.
- Nospiediet F5, lai palaistu makro.
Lai saglabātu makrogrammu, noteikti saglabājiet failu kā Excel darbgrāmatu ar makrogrammu funkciju (.xlsm). Sīkāku informāciju soli pa solim skatiet sadaļā Kā ievietot un palaist VBA kodu programmā Excel.
Varat arī lejupielādēt mūsu parauga darbgrāmatu ar makriem un palaist vajadzīgo makro tieši no šīs darbgrāmatas.
Darba burtnīcā paraugā ir šādi makroekrāni:
- VeryHiddenActiveSheet - padara aktīvo lapu ļoti slēptu.
- VeryHiddenSelectedSheets - padara visas atlasītās lapas ļoti slēptas.
- UnhideVeryHiddenSheets - atbloķē visas aktīvās darbgrāmatas ļoti slēptās lapas.
- UnhideAllSheets - parāda visas aktīvās darbgrāmatas slēptās lapas (parasti slēptās un ļoti slēptās).
Lai palaistu makroprogrammas programmā Excel, veiciet šādus darbības:
- Atveriet lejupielādēto darbgrāmatu un iespējojiet makrosistēmas, ja tiek pieprasīts.
- Atveriet savu darbgrāmatu.
- Darba burtnīcā nospiediet Alt + F8 , atlasiet interesējošo makro un noklikšķiniet uz Palaist .
Piemēram, šeit ir parādīts, kā visas atlasītās darblapas var padarīt ļoti slēptas:
Es ceru, ka šī īsā pamācība ir nedaudz izgaismojusi Excel ļoti slēptās lapas. Paldies, ka izlasījāt, un ceru, ka nākamnedēļ tiksimies mūsu blogā!
Darba burtnīcas paraugs lejupielādei
Ļoti slēptās lapas makro (.xlsm fails)