Makro programu Excel na uloženie zošita pred zatvorením

Tu uvedené makro je vynikajúci spôsob, ako chrániť používateľov pred neúmyselným zatvorením súboru pred uložením. Po implementácii toto makro zabezpečí, že Excel automaticky uloží zošit pred jeho zatvorením.

Excel zvyčajne upozorní používateľov, ktorí sa pokúšajú zavrieť neuložený zošit, a poskytne im možnosť uložiť pred zatvorením. Mnoho používateľov však môže varovanie preskočiť a neúmyselne kliknúť na Nie, čím Excelu povie, aby sa zatvoril bez uloženia. Pomocou tohto makra sa proti tomu chránite automatickým uložením pred zatvorením.

Ako funguje makro

Kód sa spúšťa udalosťou BeforeClose zošita. Pri pokuse o zatvorenie zošita sa spustí táto udalosť a spustí sa v ňom kód. Jadro kódu je jednoduché – pýta sa používateľov, či chcú zošit zavrieť. Makro potom vyhodnotí, či používateľ klikol na tlačidlo OK alebo Zrušiť.

Makro programu Excel na uloženie zošita pred zatvorením

Správa, ktorá sa zobrazí pri pokuse o zatvorenie zošita.

Vyhodnotenie sa vykonáva pomocou príkazu Select Case. Príkaz Select Case je alternatívou k príkazu If-Then-Else, ktorý vám umožňuje vykonávať kontroly stavu vašich makier. Základná konštrukcia príkazu Select Case je jednoduchá:

Vyberte položku Prípad 
Prípad je = 
       
Prípad je =
       
Prípad je =
       
Koniec Vyberte

Pomocou príkazu Select Case môžete vykonať veľa podmienených kontrol. V tomto prípade jednoducho začiarknete OK alebo Zrušiť. Pozrite sa na kód:

Súkromný podriadený zošit_pred zatvorením (zrušiť ako boolovský)
'Krok 1: Aktivujte okno so správou a spustite kontrolu
    Vyberte Case MsgBox("Uložiť a zavrieť?", vbOKZrušiť)
'Krok 2: Stlačené tlačidlo Zrušiť, takže zrušte zatvorenie
    Prípad je = vbCancel
    Zrušiť = pravda
'Krok 3: Stlačené tlačidlo OK, takže zošit uložte a zatvorte
    Prípad je = vbOK
    ActiveWorkbook.Save
'Krok 4: Zatvorte vyhlásenie Select Case
Koniec Vyberte
End Sub

V kroku 1 aktivujete okno hlásenia ako kontrolu stavu pre vyhlásenie Select Case. Argument vbOKCancel použijete, aby ste zabezpečili, že tlačidlá OK a Zrušiť budú prezentované ako voľby.

Ak v kroku 2 používateľ klikol na tlačidlo Zrušiť v okne so správou, makro povie programu Excel, aby zrušil udalosť Workbook_Close odovzdaním hodnoty True do booleovskej hodnoty Cancel.

Ak používateľ klikol na tlačidlo OK v okne so správou, krok 3 nadobudne účinnosť. Tu poviete Excelu, aby uložil zošit. A pretože ste nenastavili hodnotu Cancel Boolean na hodnotu True, Excel pokračuje so zatvorením.

V kroku 4 jednoducho zatvoríte vyhlásenie Select Case. Zakaždým, keď vytvoríte inštanciu Select Case, musíte ho uzavrieť zodpovedajúcim End Select.

Ako používať makro

Ak chcete implementovať toto makro, musíte ho skopírovať a prilepiť do okna kódu udalosti Workbook_BeforeClose. Umiestnením makra tam umožníte jeho spustenie pri každom pokuse o zatvorenie zošita:

Aktivujte Editor jazyka Visual Basic stlačením Alt+F11.

V okne projektu nájdite názov projektu/zošita a kliknutím na znamienko plus vedľa neho zobrazte všetky hárky.

Kliknite na Tento zošit.

V rozbaľovacom zozname Udalosť vyberte udalosť BeforeClose.

Zadajte alebo prilepte kód do novovytvoreného modulu.

Makro programu Excel na uloženie zošita pred zatvorením

Zadajte svoj kód do udalosti Workbook BeforeClose.


Ako zablokovať Microsoft Word otváranie súborov v režime iba na čítanie v systéme Windows

Ako zablokovať Microsoft Word otváranie súborov v režime iba na čítanie v systéme Windows

Ako zablokovať Microsoft Word otváranie súborov v režime len na čítanie v systéme Windows Microsoft Word otvára súbory v režime len na čítanie, takže ich nie je možné upravovať? Nebojte sa, metódy sú uvedené nižšie

Ako opraviť nesprávnu tlač dokumentov Microsoft Word

Ako opraviť nesprávnu tlač dokumentov Microsoft Word

Ako opraviť chyby pri tlači nesprávnych dokumentov Microsoft Word Chyby pri tlači dokumentov Word so zmeneným typom písma, chaotickými odsekmi, chýbajúcim textom alebo strateným obsahom sú pomerne časté. Avšak, nie

Vymažte kresby perom a zvýrazňovačom na svojich PowerPointových snímkach

Vymažte kresby perom a zvýrazňovačom na svojich PowerPointových snímkach

Ak ste použili pero alebo zvýrazňovač na kreslenie na powerpointové snímky počas prezentácie, môžete si kresby uložiť pre ďalšiu prezentáciu alebo ich vymazať, aby ste pri ďalšom zobrazení začali s čistými powerpointovými snímkami. Ak chcete vymazať kresby perom a zvýrazňovačom, postupujte podľa týchto pokynov: Vymazanie riadkov jedna na […]

Obsah knižnice štýlov v SharePointe 2010

Obsah knižnice štýlov v SharePointe 2010

Knižnica štýlov obsahuje súbory CSS, súbory XSL (Extensible Stylesheet Language) a obrázky používané preddefinovanými vzorovými stránkami, rozloženiami strán a ovládacími prvkami v SharePointe 2010. Ak chcete nájsť súbory CSS v knižnici štýlov publikačnej lokality: Vyberte Akcie lokality→Zobraziť Všetok obsah stránky. Zobrazí sa obsah stránky. Knižnica štýlov sa nachádza v […]

Formátovanie čísel v tisíckach a miliónoch v správach Excel

Formátovanie čísel v tisíckach a miliónoch v správach Excel

Nezahlcujte svoje publikum obrovskými číslami. V programe Microsoft Excel môžete zlepšiť čitateľnosť svojich tabúľ a zostáv formátovaním čísel tak, aby sa zobrazovali v tisíckach alebo miliónoch.

Ako zdieľať a sledovať lokality SharePoint

Ako zdieľať a sledovať lokality SharePoint

Zistite, ako používať nástroje sociálnych sietí SharePoints, ktoré umožňujú jednotlivcom a skupinám komunikovať, spolupracovať, zdieľať a spájať sa.

Ako previesť dátumy do Julianových formátov v Exceli

Ako previesť dátumy do Julianových formátov v Exceli

Juliánske dátumy sa často používajú vo výrobných prostrediach ako časová pečiatka a rýchla referencia pre číslo šarže. Tento typ kódovania dátumu umožňuje maloobchodníkom, spotrebiteľom a servisným zástupcom identifikovať, kedy bol produkt vyrobený, a teda aj vek produktu. Juliánske dátumy sa používajú aj v programovaní, armáde a astronómii. Rôzne […]

Ako vytvoriť Access Web App

Ako vytvoriť Access Web App

V Accesse 2016 môžete vytvoriť webovú aplikáciu. Čo je to teda webová aplikácia? Web znamená, že je online a aplikácia je len skratka pre „aplikáciu“. Vlastná webová aplikácia je online databázová aplikácia, ku ktorej sa pristupuje z cloudu pomocou prehliadača. Vytvárate a udržiavate webovú aplikáciu vo verzii pre počítače […]

Panel rýchleho spustenia v SharePointe 2010

Panel rýchleho spustenia v SharePointe 2010

Väčšina stránok v SharePointe 2010 zobrazuje zoznam navigačných prepojení na paneli Rýchle spustenie pozdĺž ľavej strany stránky. Panel Rýchle spustenie zobrazuje prepojenia na odporúčaný obsah lokality, ako sú zoznamy, knižnice, lokality a publikačné stránky. Panel Rýchle spustenie obsahuje dva veľmi dôležité odkazy: Odkaz na celý obsah lokality: […]

Čo znamenajú chybové hlásenia v programe Excel?

Čo znamenajú chybové hlásenia v programe Excel?

Pre jednoduché problémy Riešiteľ v Exceli zvyčajne rýchlo nájde optimálne hodnoty premennej Riešiteľ pre cieľovú funkciu. V niektorých prípadoch má však Riešiteľ problém nájsť hodnoty premennej Riešiteľ, ktoré optimalizujú cieľovú funkciu. V týchto prípadoch Riešiteľ zvyčajne zobrazí hlásenie alebo chybové hlásenie, ktoré popisuje alebo diskutuje problém, ktorý […]