V tomto článku sa naučíme, ako vyniknúť blízky zošit pomocou jazyka VBA v programe Microsoft Excel 2010.
Potom, čo vaše makro / kód VBA vykoná všetky požadované akcie, budete chcieť, aby makro súbor buď uložilo, alebo ho uloženie preskočilo. Tu sú teda možnosti, ktoré môžete v kóde nastaviť, keď ho požiadate o zatvorenie súboru. Na zatváranie a otváranie zošitov je možné použiť metódu Zavrieť a otvoriť vo VBA.
Ak chcete, aby kód súbor iba zavrel bez uloženia zmien - použite tento riadok na konci kódu alebo kdekoľvek je to potrebné -
ActiveWorkbook.Close (False) alebo ActiveWorkbook. Zatvorte nepravdu alebo ActiveWorkbook.CloseSaveChanges: = FALSE
Pozrite si kód na tomto obrázku nižšie. Ak chcete kód skopírovať, stlačte kombináciu klávesov Alt + F11 na klávesnici a uistite sa, že je otvorený list programu Excel. Potom kliknite pravým tlačidlom myši na objekty programu Microsoft Excel a vyberte položku Vložiť. Potom kliknite na modul. Skopírujte kód uvedený pod obrázkom -
Možnosť explicitná
Čiastkové makro1 ()
ActiveWorkbook. Zatvorte nepravdu
Koniec pod
Poznámka: Text ActiveWorkbook môžete zmeniť tak, aby odkazoval na názov zošita alebo premennú, ktorú ste použili na identifikáciu zošita, podľa kódu.
Ak chcete, aby kód uložil zmeny pri zatváraní súboru, použite príkaz
ActiveWorkbook.Close (True) alebo ActiveWorkbook. Zatvorte True alebo ActiveWorkbook.Close SaveChanges: = TRUE
Tu je kód -
Možnosť explicitná
Čiastkové makro1 ()
ActiveWorkbook. Zatvorte True
Koniec pod
Ak však chcete, aby sa užívateľ rozhodol, stačí zadať
ActiveWorkbook.Zavrieť
Tu je kód -
Možnosť explicitná
Čiastkové makro1 ()
ActiveWorkbook.Zavrieť
Koniec pod
Používateľ dostane vyskakovacie okno s otázkou, či chce zošit uložiť alebo nie.
Zošity ("File1.XLS"). Zatvorte SaveChanges: = False
Tento príklad zatvorí súbor File1.xls a zahodí všetky zmeny, ktoré v ňom boli vykonané.
Záver:
Ak bola možnosť „Application.DisplayAlerts“ nastavená na hodnotu False, nezobrazí sa žiadne kontextové okno a zošit sa priamo zatvorí bez výzvy na uloženie.
Toto vyskakovacie okno sa zobrazí, ak „Application.DisplayAlerts“ nie je nikde pred excelom vba Activeworkbook.Close nastavený na hodnotu False. Zatvorte riadok kódu.
Takže aj keď kód vyžaduje vypnutie upozornení, zaistite, aby sa pred riadkom Activeworkbook.Close nachádzalo „Application.DisplayAlerts = True“.
Ak sa vám páčili naše blogy, zdieľajte ich so svojimi priateľmi na Facebooku. A tiež nás môžete sledovať na Twitteri a Facebooku.
Radi by sme vás počuli, dajte nám vedieť, ako môžeme zlepšiť, doplniť alebo inovovať našu prácu a zlepšiť ju pre vás. Napíšte nám nae -mailová stránka