Iespējams, vēlēsities paslēpt neaktīvās darblapas, izmantojot šo makro. Programma Excel neļauj paslēpt visas darbgrāmatas lapas; ir jāparāda vismaz viens. Tomēr jūs varat paslēpt visu, izņemot aktīvo lapu.
Šeit esošais makro cilpas cauri darblapām un saskaņo katras darblapas nosaukumu ar aktīvās lapas nosaukumu. Katru reizi, kad makro cilpas, tas paslēpj visas nesaskaņotās darblapas.
Apakšmakro1()
1. darbība: deklarējiet savus mainīgos
Dim ws kā darblapa
2. darbība: sāciet pārlūkot visas darblapas
Katram ws šajā darbgrāmatā.Darblapas
3. darbība: pārbaudiet katras darblapas nosaukumu
Ja ws.Name <> ThisWorkbook.ActiveSheet.Name Tad
4. darbība: paslēpiet lapu
ws.Visible = xlSheetHidden
Beigas Ja
5. darbība: pārejiet uz nākamo darblapu
Nākamais vs
Beigt apakš
1. darbība deklarē objektu ar nosaukumu ws. Veicot šo darbību, tiek izveidots atmiņas konteiners katrai darblapai, kurā tiek veikta makro cilpa.
Ar 2. darbību tiek sākta cilpa, liekot programmai Excel novērtēt visas šīs darbgrāmatas darblapas. Ņemiet vērā atšķirību starp ThisWorkbook un ActiveWorkbook. Objekts ThisWorkBook attiecas uz darbgrāmatu, kurā ir kods. ActiveWorkBook objekts attiecas uz pašlaik aktīvo darbgrāmatu. Viņi bieži atgriež vienu un to pašu objektu, bet, ja darbgrāmata, kurā darbojas kods, nav aktīvā darbgrāmata, tie atgriež dažādus objektus. Šajā gadījumā jūs nevēlaties riskēt ar lapu paslēpšanu citās darbgrāmatās, tāpēc izmantojiet ThisWorkBook.
3. darbībā makro vienkārši salīdzina aktīvās lapas nosaukumu ar lapu, kurai pašlaik tiek veikta cilpa.
Ja lapu nosaukumi atšķiras, 4. darbībā makro paslēpj lapu.
Veicot 5. darbību, veiciet cilpu atpakaļ, lai iegūtu nākamo lapu. Kad visas lapas ir novērtētas, makro beidzas.
Ņemiet vērā, ka savā makro izmantojat xlsheetHidden. Šis rekvizīts piemēro noklusējuma slēpšanas stāvokli, ko parasti iegūstat, ar peles labo pogu noklikšķinot uz lapas un atlasot Slēpt. Šajā noklusējuma slēpšanas stāvoklī lietotājs var ar peles labo pogu noklikšķināt uz jebkuras cilnes un izvēlēties Parādīt slēpšanu, kas parāda visas slēptās lapas. Bet cits slēpšanas stāvoklis ir vairāk slepens nekā noklusējuma stāvoklis. Ja izmantojat xlSheetVeryHidden, lai paslēptu lapas, lietotāji tās vispār nevarēs redzēt — pat ja viņi ar peles labo pogu noklikšķina uz cilnes un izvēlas Parādīt slēpšanu. Vienīgais veids, kā paslēpt šādā veidā paslēptu lapu, ir izmantot VBA.
Lai ieviestu šo makro, varat to kopēt un ielīmēt standarta modulī:
Aktivizējiet Visual Basic redaktoru, nospiežot Alt+F11.
Ar peles labo pogu noklikšķiniet uz projekta/darbgrāmatas nosaukuma projekta logā.
Izvēlieties Ievietot → Modulis.
Ierakstiet vai ielīmējiet kodu jaunizveidotajā modulī.
Kā neļaut Microsoft Word atvērt failus tikai lasīšanas režīmā operētājsistēmā Windows Microsoft Word atver failus tikai lasīšanas režīmā, padarot tos neiespējamu rediģēt? Neuztraucieties, metodes ir norādītas zemāk
Kā labot kļūdas, drukājot nepareizus Microsoft Word dokumentus.Kļūdas Word dokumentu drukāšanā ar mainītiem fontiem, nekārtīgām rindkopām, trūkstoša teksta vai pazaudētu saturu ir diezgan izplatītas. Tomēr nevajag
Ja prezentācijas laikā esat izmantojis pildspalvu vai marķieri, lai zīmētu uz PowerPoint slaidiem, varat saglabāt zīmējumus nākamajai prezentācijai vai izdzēst tos, lai nākamajā reizē, kad to parādīsit, jūs sāktu ar tīriem PowerPoint slaidiem. Izpildiet šos norādījumus, lai dzēstu pildspalvas un marķiera zīmējumus: Līniju dzēšana pa vienai […]
Stilu bibliotēkā ir CSS faili, paplašināmās stila lapu valodas (XSL) faili un attēli, ko izmanto iepriekš definētas šablona lapas, lapu izkārtojumi un vadīklas programmā SharePoint 2010. Lai atrastu CSS failus publicēšanas vietnes stilu bibliotēkā: izvēlieties Vietnes darbības → Skatīt Viss vietnes saturs. Tiek parādīts vietnes saturs. Stila bibliotēka atrodas […]
Nepārsedziet savu auditoriju ar milzīgiem skaitļiem. Programmā Microsoft Excel varat uzlabot informācijas paneļu un pārskatu lasāmību, formatējot skaitļus tā, lai tie tiktu rādīti tūkstošos vai miljonos.
Uzziniet, kā izmantot SharePoints sociālo tīklu rīkus, kas ļauj indivīdiem un grupām sazināties, sadarboties, koplietot un sazināties.
Jūlija datumi ražošanas vidēs bieži tiek izmantoti kā laikspiedols un ātra atsauce partijas numuram. Šāda veida datuma kodēšana ļauj mazumtirgotājiem, patērētājiem un pakalpojumu aģentiem noteikt produkta izgatavošanas laiku un līdz ar to arī produkta vecumu. Jūlija datumi tiek izmantoti arī programmēšanā, militārajā jomā un astronomijā. Savādāk […]
Programmā Access 2016 varat izveidot tīmekļa lietotni. Kas tad vispār ir tīmekļa lietotne? Tīmeklis nozīmē, ka tas ir tiešsaistē, un lietotne ir tikai “lietojumprogrammas” saīsinājums. Pielāgota tīmekļa lietotne ir tiešsaistes datu bāzes lietojumprogramma, kurai var piekļūt no mākoņa, izmantojot pārlūkprogrammu. Jūs veidojat un uzturat tīmekļa lietotni darbvirsmas versijā […]
Lielākā daļa SharePoint 2010 lapu ātrās palaišanas joslā lapas kreisajā pusē parāda navigācijas saišu sarakstu. Ātrās palaišanas joslā tiek rādītas saites uz piedāvāto vietņu saturu, piemēram, sarakstiem, bibliotēkām, vietnēm un publicēšanas lapām. Ātrās palaišanas joslā ir divas ļoti svarīgas saites: Visa vietnes satura saite: […]
Vienkāršām problēmām risinātājs programmā Excel parasti ātri atrod optimālās Risinātāja mainīgā vērtības mērķa funkcijai. Taču dažos gadījumos Solver ir grūti atrast Solver mainīgā vērtības, kas optimizē mērķa funkciju. Šādos gadījumos Solver parasti parāda ziņojumu vai kļūdas ziņojumu, kurā aprakstīta vai apspriesta problēma, ko […]
