Mõnikord võite soovida kustutada Exceli töövihikust kõik peale aktiivse töölehe. Nendes olukordades saate kasutada järgmist makrot.
Siinne makro liigub läbi töölehtede, sobitades iga töölehe nime aktiivse lehe nimega. Iga kord, kui makro loob silmuseid, kustutab see kõik sobimatud töölehed. Pange tähele atribuudi DisplayAlerts kasutamist 4. sammus. See lülitab Exceli hoiatused tõhusalt välja, nii et te ei pea iga kustutamist kinnitama.
Alammakro1()
1. samm: deklareerige oma muutujad
Dim ws töölehena
2. samm: alustage kõigi töölehtede sirvimist
For Every Ws In ThisWorkbook.Worksheets
3. samm: kontrollige iga töölehe nime
Kui ws.Name <> ThisWorkbook.ActiveSheet.Name Siis
4. samm: lülitage hoiatused välja ja kustutage
Application.DisplayAlerts = Vale
ws.Delete
Application.DisplayAlerts = Tõene
Lõpeta Kui
5. samm: liikuge järgmise töölehe juurde
Järgmine ws
Lõpeta alam
Makro deklareerib esmalt objekti nimega ws. See samm loob iga töölehe jaoks mälumahuti, mida see läbib.
2. toimingus alustab makro silmust, öeldes Excelile, et see hindab kõiki selle töövihiku töölehti. ThisWorkbookil ja ActiveWorkbookil on erinevus. Objekt ThisWorkBook viitab koodi sisaldavale töövihikule. Objekt ActiveWorkBook viitab hetkel aktiivsele töövihikule. Sageli tagastavad nad sama objekti, kuid kui koodi käitav töövihik pole aktiivne töövihik, tagastavad nad erinevad objektid. Sel juhul ei taha te riskida lehtede kustutamisega teistes töövihikutes, seega kasutate ThisWorkBook.
3. sammus võrdleb makro lihtsalt aktiivse lehe nime lehega, mida praegu silmustatakse.
Kui lehtede nimed on 4. sammus erinevad, kustutab makro lehe. Nagu mainitud, kasutate rakendust DisplayAlerts, et maha suruda kõik Exceli kinnitused. Kui soovite enne lehtede kustutamist hoiatust saada, võite rakenduse rakenduse vahele jätta. DisplayAlerts = vale. DisplayAlertsi avalduse väljajätmine tagab teile kuvatava sõnumi, mis võimaldab teil töölehtede kustutamise otsusest taganeda.
5. sammus pöördub makro järgmise lehe saamiseks tagasi. Pärast kõigi lehtede hindamist makro lõpeb.
Hoiatusteadete nägemiseks jätke DisplayAlertsi avaldus välja.
Selle makro rakendamiseks saate selle kopeerida ja kleepida standardmoodulisse:
Aktiveerige Visual Basic Editor, vajutades Alt+F11.
Paremklõpsake projekti aknas projekti/töövihiku nimel.
Valige Lisa → Moodul.
Tippige või kleepige kood vastloodud moodulisse.
Kui kasutate makros ActiveWorkbooki asemel ThisWorkbooki, ei saa te makrot isiklikust makro töövihikust käivitada. Miks? Kuna ThisWorkbook viitaks isiklikule makro töövihikule, mitte töövihikule, millele makro peaks kehtima.
Uurige kümmet nõuannet Microsoft Teamsiga parema koosolekukogemuse saamiseks, sealhulgas märkmete tegemine, tausta hägustamine, vaigistamine ja koosolekute salvestamine.
Lühikeses Word 2013 dokumendis saate kommentaare hõlpsalt sirvida ja uurida. Siit leiate samm-sammult, kuidas kommentaare lugeda ja eemaldada.
Mõnikord varitseb kurjus selles, mis peaks olema Word 2016 peamises mõistlikkuse hoidlas: tavalises mallifailis. Õpi, kuidas taastada normaalne mall ja eemaldada probleemid.
Kuidas lisada lõigu taane Word 2013-s, et luua selgem ja professionaalsem ilme. Meie juhend aitab sul lihtsasti navigeerida Wordi funktsioonide kaudu ja tutvustab esimeses reas taande ning rippuva taande lisamise viise.
Lisaks kuuele kiirtoimingule, mis kuvatakse Outlooki esmakordsel installimisel, on teil valida veelgi rohkemate Quick Step mallide hulgast.
Kui olete esitluse ajal PowerPointi slaididele joonistamiseks kasutanud pliiatsit või markerit, saate joonised järgmise esitluse jaoks salvestada või need kustutada, nii et järgmisel näitamisel alustate puhaste PowerPointi slaididega. Pliiatsi ja markeri jooniste kustutamiseks järgige neid juhiseid: joonte kustutamine […]
Style'i teek sisaldab CSS-faile, XSL-faile ja eelmääratletud mallilehtede, lehepaigutuste ja juhtelementide poolt kasutatavaid pilte rakenduses SharePoint 2010. CSS-failide leidmiseks avaldamissaidi stiiliteegist: valige saidi toimingud → vaade. Kogu saidi sisu. Ilmub saidi sisu. Style raamatukogu asub […]
Ärge uputage oma publikut tohutute numbritega. Microsoft Excelis saate parandada oma armatuurlaudade ja aruannete loetavust, vormindades numbrid tuhandetes või miljonites.
Siit saate teada, kuidas kasutada SharePointi suhtlusvõrgustiku tööriistu, mis võimaldavad üksikisikutel ja rühmadel suhelda, koostööd teha, jagada ja ühendada.
Julia kuupäevi kasutatakse tootmiskeskkondades sageli ajatemplina ja partiinumbri kiirviitena. Seda tüüpi kuupäevade kodeerimine võimaldab jaemüüjatel, tarbijatel ja teenindusagentidel tuvastada toote valmistamise aja ja seega toote vanuse. Juliuse kuupäevi kasutatakse ka programmeerimises, sõjaväes ja astronoomias. Erinevad […]
