Excel fjölvi til að eyða öllu nema virka vinnublaðinu

Stundum gætirðu viljað eyða öllu nema virka vinnublaðinu í Excel vinnubók. Við þessar aðstæður geturðu notað eftirfarandi fjölvi.

Hvernig macro virkar

Fjölvi hér fer í gegnum vinnublöðin og passar nafn hvers vinnublaðs við nafn virka blaðsins. Í hvert skipti sem makróið fer í lykkjur eyðir það hvaða verkefnablaði sem er án samsvörunar. Athugaðu notkun DisplayAlerts eignarinnar í skrefi 4. Þetta slekkur í raun á viðvaranir Excel svo þú þarft ekki að staðfesta hverja eyðingu.

Sub Macro1()
'Skref 1: Lýstu breytunum þínum
    Dim ws As Worksheet
'Skref 2: Byrjaðu að fara í gegnum öll vinnublöðin
    Fyrir hvern var í þessari vinnubók.Vinnublöð
'Skref 3: Athugaðu heiti hvers vinnublaðs
    Ef ws.Name <> ThisWorkbook.ActiveSheet.Name Þá
'Skref 4: Slökktu á viðvörunum og eyddu
    Application.DisplayAlerts = False
    ws.Eyða
    Application.DisplayAlerts = True
    End If
'Skref 5: Farðu yfir í næsta vinnublað
    Næsta ws
End Sub

Fjölvi lýsir fyrst yfir hlut sem heitir ws. Þetta skref býr til minnisílát fyrir hvert vinnublað sem það fer í gegnum.

Í skrefi 2 byrjar fjölvi að lykkja og segir Excel að það muni meta öll vinnublöð í þessari vinnubók. Það er munur á ThisWorkbook og ActiveWorkbook. ThisWorkBook hluturinn vísar til vinnubókarinnar sem inniheldur kóðann. ActiveWorkBook hluturinn vísar til virku vinnubókarinnar. Þeir skila oft sama hlutnum, en ef vinnubókin sem keyrir kóðann er ekki virka vinnubókin skila þeir mismunandi hlutum. Í þessu tilviki vilt þú ekki eiga á hættu að eyða blöðum í öðrum vinnubókum, svo þú notar ThisWorkBook.

Í skrefi 3 ber fjölvi einfaldlega saman heiti virka blaðsins við blaðið sem er í lykkju.

Í skrefi 4, ef nöfnin eru önnur, eyðir fjölvi blaðinu. Eins og fram hefur komið notarðu DisplayAlerts til að bæla niður allar staðfestingarathuganir frá Excel. Ef þú vilt fá viðvörun áður en þú eyðir blöðunum geturðu sleppt umsókn. DisplayAlerts = False. Að sleppa DisplayAlerts yfirlýsingunni tryggir að þú færð skilaboðin sýnd, sem gerir þér kleift að hverfa frá ákvörðuninni um að eyða vinnublöðum.

Í skrefi 5 fer makróið til baka til að fá næsta blað. Eftir að öll blöðin hafa verið metin lýkur fjölvi.

Excel fjölvi til að eyða öllu nema virka vinnublaðinu

Slepptu DisplayAlerts yfirlýsingunni til að sjá viðvörunarskilaboð.

Hvernig á að nota macro

Til að útfæra þetta fjölvi geturðu afritað og límt það inn í venjulega einingu:

Virkjaðu Visual Basic Editor með því að ýta á Alt+F11.

Hægrismelltu á heiti verkefnis/vinnubókar í verkefnaglugganum.

Veldu Insert→ Module.

Sláðu inn eða límdu kóðann í nýstofnaða einingu.

Þegar þú notar ThisWorkbook í stað ActiveWorkbook í fjölvi geturðu ekki keyrt fjölva úr persónulegu stórvinnubókinni. Hvers vegna? Vegna þess að ThisWorkbook myndi vísa til persónulegu makróvinnubókarinnar, ekki vinnubókarinnar sem makróið ætti að eiga við.


Hvernig á að koma í veg fyrir að Microsoft Word opni skrár í skrifvarinn ham á Windows

Hvernig á að koma í veg fyrir að Microsoft Word opni skrár í skrifvarinn ham á Windows

Hvernig á að koma í veg fyrir að Microsoft Word opni skrár í skrifvarandi ham á Windows. Microsoft Word opnar skrár í skrifvarandi ham, sem gerir það ómögulegt að breyta þeim? Ekki hafa áhyggjur, aðferðirnar eru hér að neðan

Hvernig á að laga ranga prentun á Microsoft Word skjölum

Hvernig á að laga ranga prentun á Microsoft Word skjölum

Hvernig á að laga villur við prentun á röngum Microsoft Word skjölum Villur við prentun Word skjala með breyttu letri, sóðalegar málsgreinar, texta sem vantar eða glatað efni eru nokkuð algengar. Hins vegar ekki

Eyddu penna- og auðkennisteikningum á PowerPoint-skyggnunum þínum

Eyddu penna- og auðkennisteikningum á PowerPoint-skyggnunum þínum

Ef þú hefur notað pennann eða hápunktarann ​​til að teikna á PowerPoint glærurnar þínar meðan á kynningu stendur geturðu vistað teikningarnar fyrir næstu kynningu eða eytt þeim út svo næst þegar þú sýnir þær byrjarðu á hreinum PowerPoint glærum. Fylgdu þessum leiðbeiningum til að eyða penna- og auðkenningarteikningum: Að eyða línum einni á […]

Innihald stílasafns í SharePoint 2010

Innihald stílasafns í SharePoint 2010

Stílsafnið inniheldur CSS skrár, Extensible Stylesheet Language (XSL) skrár og myndir sem notaðar eru af fyrirfram skilgreindum aðalsíðum, síðuuppsetningum og stjórntækjum í SharePoint 2010. Til að finna CSS skrár í stílasafni útgáfusíðunnar: Veldu Site Actions→ View Allt efni á síðunni. Innihald síðunnar birtist. Style bókasafnið er staðsett í […]

Snið tölur í þúsundum og milljónum í Excel skýrslum

Snið tölur í þúsundum og milljónum í Excel skýrslum

Ekki yfirgnæfa áhorfendur með stórkostlegum tölum. Í Microsoft Excel geturðu bætt læsileika mælaborða og skýrslna með því að forsníða tölurnar þínar þannig að þær birtast í þúsundum eða milljónum.

Hvernig á að deila og fylgja SharePoint síðum

Hvernig á að deila og fylgja SharePoint síðum

Lærðu hvernig á að nota SharePoints samfélagsnetverkfæri sem gera einstaklingum og hópum kleift að eiga samskipti, vinna saman, deila og tengjast.

Hvernig á að umbreyta dagsetningum í Julian snið í Excel

Hvernig á að umbreyta dagsetningum í Julian snið í Excel

Julian dagsetningar eru oft notaðar í framleiðsluumhverfi sem tímastimpill og fljótleg tilvísun fyrir lotunúmer. Þessi tegund af dagsetningarkóðun gerir söluaðilum, neytendum og þjónustuaðilum kleift að bera kennsl á hvenær vara var framleidd og þar með aldur vörunnar. Julian dagsetningar eru einnig notaðar í forritun, hernum og stjörnufræði. Mismunandi […]

Hvernig á að búa til Access Web App

Hvernig á að búa til Access Web App

Þú getur búið til vefforrit í Access 2016. Svo hvað er vefforrit eiginlega? Jæja, vefurinn þýðir að hann er á netinu og app er bara stytting fyrir „umsókn“. Sérsniðið vefforrit er gagnagrunnsforrit á netinu sem hægt er að nálgast úr skýinu með vafra. Þú smíðar og viðheldur vefforritinu í skrifborðsútgáfunni […]

Quick Launch Bar í SharePoint 2010

Quick Launch Bar í SharePoint 2010

Flestar síður í SharePoint 2010 sýna lista yfir flakktengla á flýtiræsingarstikunni vinstra megin á síðunni. Flýtiræsingarstikan sýnir tengla á innihaldsefni vefsvæða eins og lista, bókasöfn, síður og útgáfusíður. Flýtiræsingarstikan inniheldur tvo mjög mikilvæga tengla: Tengill á allt efni vefsvæðis: […]

Hvað þýða villuskilaboðin í Excel?

Hvað þýða villuskilaboðin í Excel?

Fyrir einföld vandamál finnur Solver í Excel venjulega fljótt bestu Solver breytugildin fyrir hlutfallsaðgerðina. En í sumum tilfellum á Solver í vandræðum með að finna Solver breytugildin sem hámarka hlutfallsaðgerðina. Í þessum tilvikum birtir Solver venjulega skilaboð eða villuboð sem lýsir eða ræðir vandræðin sem […]