Excel fjölvi til að koma í veg fyrir að vinnubækur lokist

Það eru tímar þegar þú vilt ekki að notandi loki Excel vinnubók án þess að slá inn ákveðin gögn. Í þessum aðstæðum væri gagnlegt að neita notandanum um möguleikann á að loka vinnubókinni þar til markreiturinn er fylltur út (eins og sýnt er hér). Þetta er þar sem þetta sniðuga macro kemur inn.

Excel fjölvi til að koma í veg fyrir að vinnubækur lokist

Komið í veg fyrir lokun þar til ákveðinn hólf er fylltur.

Hvernig macro virkar

Þessi kóði er settur af stað af BeforeClose atburði vinnubókarinnar. Þegar þú reynir að loka vinnubókinni kviknar þetta atvik og keyrir kóðann innan. Þessi fjölvi athugar hvort markreiturinn (reitur C7, í þessu tilfelli) sé tómur. Ef það er tómt er lokaferlinu hætt. Ef C7 er ekki tómt er vinnubókin vistuð og lokuð:

Private Sub Workbook_BeforeClose(Hætta við sem Boolean)
'Skref 1: Athugaðu hvort klefi C7 er auður
If Sheets("Sheet1").Range("C7").Value = " Þá
'Skref 2: Ef reiturinn er auður skaltu hætta við lokunina og segja notandanum frá því
    Hætta við = satt
    MsgBox "Cell C7 getur ekki verið auð"
'Skref 3: Ef reiturinn er ekki auður skaltu vista og loka
Annar
    ActiveWorkbook.Close SaveChanges:=True
End If
End Sub

Skref 1 athugar hvort C7 sé auður.

Ef C7 er auður tekur skref 2 gildi og hættir við lokunarferlinu með því að senda True til Cancel Boolean. Skref 2 virkjar líka skilaboðareit sem lætur notandann vita af heimsku sinni (jæja, það er ekki alveg svo harkalegt, í raun).

Í skrefi 3, ef reit C7 er ekki auður, er vinnubókin vistuð og lokuð.

Hvernig á að nota macro

Til að útfæra þetta fjölvi þarftu að afrita og líma það inn í Workbook_BeforeClose atburðakóðagluggann. Með því að setja makróið hér getur það keyrt í hvert skipti sem þú reynir að loka vinnubókinni:

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

Í verkefnaglugganum, finndu nafn verkefnisins/vinnubókarinnar og smelltu á plúsmerkið við hliðina á því til að sjá öll blöðin.

Smelltu á This Workbook.

Í fellilistanum Atburður skaltu velja BeforeClose viðburðinn.

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

Excel fjölvi til að koma í veg fyrir að vinnubækur lokist

Sláðu inn kóðann þinn í Workbook BeforeClose atburðinum.

Leave a Comment

Námundun tölur í Excel 2007 með ROUND, ROUNDUP og ROUNDDOWN

Námundun tölur í Excel 2007 með ROUND, ROUNDUP og ROUNDDOWN

Fyrir þá sem vilja læra um aðferðir eins og <strong>ROUND</strong>, <strong>ROUNDUP</strong> og <strong>ROUNDDOWN</strong> í Excel 2007, skoðaðu þessa skref-fyrir-skref leiðbeiningu um hvernig á að rúnna tölur á réttan hátt.

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: […]