Excel makronaredba za spremanje radne knjige prije zatvaranja

Ovdje predstavljena makronaredba izvrstan je način zaštite korisnika od nenamjernog zatvaranja datoteke prije spremanja. Kada se implementira, ova makronaredba osigurava da Excel automatski sprema radnu knjigu prije zatvaranja.

Excel će obično upozoriti korisnike koji pokušavaju zatvoriti nespremljenu radnu knjigu, dajući im mogućnost spremanja prije zatvaranja. Međutim, mnogi korisnici mogu proći kroz upozorenje i nehotice kliknuti Ne, govoreći Excelu da se zatvori bez spremanja. S ovom makronaredbom štitite se od toga automatskim spremanjem prije zatvaranja.

Kako makro funkcionira

Kod se pokreće događajem BeforeClose radne knjige. Kada pokušate zatvoriti radnu knjigu, ovaj se događaj aktivira, pokreće kod unutar njega. Suština koda je jednostavna - pita korisnike žele li zatvoriti radnu knjigu. Makronaredba zatim procjenjuje je li korisnik kliknuo U redu ili Odustani.

Excel makronaredba za spremanje radne knjige prije zatvaranja

Poruka koju vidite kada pokušate zatvoriti radnu knjigu.

Evaluacija se vrši naredbom Select Case. Naredba Select Case alternativa je naredbi If-Then-Else, omogućujući vam da izvršite provjeru uvjeta u vašim makronaredbama. Osnovna konstrukcija naredbe Select Case je jednostavna:

Odaberite Case 
Slučaj Je = 
       
Slučaj Is=
       
Slučaj Is=
       
Kraj Odaberite

S naredbom Select Case možete izvesti mnoge uvjetne provjere. U ovom slučaju jednostavno provjeravate da li je OK ili Cancel. Pogledajte kod:

Privatna pod Radna knjiga_Prije zatvaranja(Odustani kao Boolean)
'Korak 1: Aktivirajte okvir za poruke i pokrenite provjeru
    Odaberite Case MsgBox("Spremi i zatvori?", vbOKCancel)
'Korak 2: Gumb za odustajanje je pritisnut, pa otkažite zatvaranje
    Slučaj Je = vbCancel
    Odustani = Istina
'Korak 3: Pritisnut je gumb OK, pa spremite radnu knjigu i zatvorite
    Slučaj Je = vbOK
    ActiveWorkbook.Save
'Korak 4: Zatvorite izjavu Select Case
Kraj Odaberite
Kraj Sub

U 1. koraku aktivirate okvir s porukom kao provjeru uvjeta za naredbu Select Case. Koristite argument vbOKCancel kako biste osigurali da su gumbi U redu i Odustani predstavljeni kao izbor.

U 2. koraku, ako je korisnik kliknuo Odustani u okviru za poruku, makronaredba govori Excelu da otkaže događaj Workbook_Close prosljeđivanjem True logičkom vrijednosti Cancel.

Ako je korisnik kliknuo gumb U redu u okviru za poruke, korak 3 stupa na snagu. Ovdje kažete Excelu da spremi radnu knjigu. A budući da niste postavili Cancel Boolean na True, Excel nastavlja sa zatvaranjem.

U 4. koraku jednostavno zatvorite izjavu Select Case. Svaki put kada instancirate Select Case, morate ga zatvoriti odgovarajućim End Selectom.

Kako koristiti makro

Da biste implementirali ovu makronaredbu, trebate je kopirati i zalijepiti u prozor koda događaja Workbook_BeforeClose. Postavljanje makronaredbe tamo omogućuje pokretanje svaki put kada pokušate zatvoriti radnu knjigu:

Aktivirajte Visual Basic Editor pritiskom na Alt+F11.

U prozoru projekta pronađite naziv projekta/radne knjige i kliknite znak plus pored njega da biste vidjeli sve listove.

Kliknite Ova radna knjiga.

Na padajućem popisu Događaj odaberite događaj Prije zatvaranja.

Upišite ili zalijepite kod u novostvoreni modul.

Excel makronaredba za spremanje radne knjige prije zatvaranja

Unesite svoj kod u događaj Radna knjiga BeforeClose.

Leave a Comment

Kako postaviti upit u bazu podataka MS Access 2019

Kako postaviti upit u bazu podataka MS Access 2019

Naučite kako postaviti upite u Access bazi podataka uz jednostavne korake i savjete za učinkovito filtriranje i sortiranje podataka.

Osnove tabulatora u programu Word 2013

Osnove tabulatora u programu Word 2013

Tabulatori su oznake položaja u odlomku programa Word 2013 koje određuju kamo će se točka umetanja pomaknuti kada pritisnete tipku Tab. Otkrijte kako prilagoditi tabulatore i optimizirati svoj rad u Wordu.

Kako odabrati i poništiti odabir blokova teksta u Wordu 2010

Kako odabrati i poništiti odabir blokova teksta u Wordu 2010

Word 2010 nudi mnoge načine označavanja i poništavanja odabira teksta. Otkrijte kako koristiti tipkovnicu i miš za odabir blokova. Učinite svoj rad učinkovitijim!

Kako uvući pasus u Wordu 2013

Kako uvući pasus u Wordu 2013

Naučite kako pravilno postaviti uvlaku za odlomak u Wordu 2013 kako biste poboljšali izgled svog dokumenta.

Kako otvoriti i zatvoriti PowerPoint 2019 prezentacije

Kako otvoriti i zatvoriti PowerPoint 2019 prezentacije

Naučite kako jednostavno otvoriti i zatvoriti svoje Microsoft PowerPoint 2019 prezentacije s našim detaljnim vodičem. Pronađite korisne savjete i trikove!

Kako crtati jednostavne objekte u PowerPointu 2013

Kako crtati jednostavne objekte u PowerPointu 2013

Saznajte kako crtati jednostavne objekte u PowerPoint 2013 uz ove korisne upute. Uključuje crtanje linija, pravokutnika, krugova i više.

Kako filtrirati podatke u programu Access 2016

Kako filtrirati podatke u programu Access 2016

U ovom vodiču vam pokazujemo kako koristiti alat za filtriranje u programu Access 2016 kako biste lako prikazali zapise koji dijele zajedničke vrijednosti. Saznajte više o filtriranju podataka.

Formule za zaokruživanje brojeva u Excelu

Formule za zaokruživanje brojeva u Excelu

Saznajte kako koristiti Excelove funkcije zaokruživanja za prikaz čistih, okruglih brojeva, što može poboljšati čitljivost vaših izvješća.

Kako dizajnirati različita zaglavlja i podnožja za različite stranice u programu Word 2013

Kako dizajnirati različita zaglavlja i podnožja za različite stranice u programu Word 2013

Zaglavlje ili podnožje koje postavite isto je za svaku stranicu u vašem Word 2013 dokumentu. Otkrijte kako koristiti različita zaglavlja za parne i neparne stranice.

Excel izvješća: prilagođeno oblikovanje brojeva

Excel izvješća: prilagođeno oblikovanje brojeva

Poboljšajte čitljivost svojih Excel izvješća koristeći prilagođeno oblikovanje brojeva. U ovom članku naučite kako se to radi i koja su najbolja rješenja.