U ovom ćemo članku naučiti kako se istaknuti bliska radna knjiga pomoću VBA u programu Microsoft Excel 2010.
Nakon što je vaša VBA makronaredba / kôd obavila sve potrebne radnje, htjeli biste da makro spremi datoteku ili preskoči spremanje. Dakle, ovdje su opcije koje možete postaviti u kodu tražeći da zatvori datoteku. Metoda Close and Open u VBA -i može se koristiti za zatvaranje i otvaranje radnih knjiga.
Ako želite da kôd samo zatvori datoteku bez spremanja promjena - upotrijebite ovaj redak na kraju koda ili gdje god je potrebno -
ActiveWorkbook.Close (False) ili ActiveWorkbook.Close False ili ActiveWorkbook.CloseSaveChanges: = FALSE
Pogledajte kod na ovoj slici ispod. Da biste kopirali kôd, pritisnite Alt + F11 na tipkovnici pazeći da je Excel otvoren. Zatim desnom tipkom miša kliknite Microsoft Excel Objects i odaberite Umetni. Zatim kliknite na Modul. Prekopirajte kôd dan ispod slike -
Opcija Eksplicitno
Podmakro1 ()
ActiveWorkbook.Close False
Kraj podm
Napomena: Tekst ActiveWorkbook možete promijeniti tako da se odnosi na naziv radne knjige ili varijablu koju ste koristili za identifikaciju radne knjige prema vašem kodu.
Ako želite da kôd spremi promjene tijekom zatvaranja datoteke, upotrijebite
ActiveWorkbook.Close (Istina) ili ActiveWorkbook.Zatvori True ili ActiveWorkbook.Zatvorite Spremi promjene: = TRUE
Evo koda -
Opcija Eksplicitno
Podmakro1 ()
ActiveWorkbook.Zatvori True
Kraj podm
Međutim, ako želite da korisnik odluči, samo trebate unijeti
ActiveWorkbook.Zatvorite
Evo koda -
Opcija Eksplicitno
Podmakro1 ()
ActiveWorkbook.Zatvorite
Kraj podm
Korisnik će dobiti skočni prozor s pitanjem želi li spremiti radnu knjigu ili ne.
Radne knjige ("File1.XLS"). Zatvorite Spremi promjene: = Netačno
Ovaj primjer će zatvoriti File1.xls i odbaciti sve promjene koje su u njemu unesene.
Zaključak:
Ako je “Application.DisplayAlerts” postavljeno na Netačno, nećete dobiti skočni prozor, a radna knjiga će se izravno zatvoriti bez upita za spremanje.
Ovaj skočni prozor pojavit će se ako "Application.DisplayAlerts" nigdje nije postavljeno na False prije excel vba Activeworkbook.Close linije koda.
Dakle, čak i ako kôd zahtijeva da isključite upozorenja, pobrinite se da se "Application.DisplayAlerts = True" nalazi ispred retka Activeworkbook.Close.
Ako vam se sviđaju naši blogovi, podijelite ih sa svojim prijateljima na Facebooku. Također nas možete pratiti na Twitteru i Facebooku.
Voljeli bismo čuti vaše mišljenje, javite nam kako možemo poboljšati, nadopuniti ili inovirati svoj rad i učiniti ga boljim za vas. Pišite nam naweb mjesto e -pošte