Suvestinė
Programoje "Microsoft Excel" galite sukurti "Microsoft Visual Basic for Applications" (VBA) makrokomandą, kuri uždarant darbaknygę nerodytų raginimo Įrašyti keitimus. Tai galima padaryti nurodant ypatybės Įrašyta būseną arba nerodyant visų darbaknygės įspėjimų.
Daugiau informacijos
NATA: "Microsoft" pateikia programavimo pavyzdžius tik iliustracijoms, be išreikštos arba numanomos garantijos. Tai apima, bet neapsiriboja, numanomas garantijas dėl tinkamumo parduoti ar tinkamumo konkrečiam tikslui. Šiame straipsnyje daroma prielaida, kad esate susipažinę su programavimo kalba, kuri yra pademonstruojama ir su įrankiais, kurie naudojami kurti ir derinti procedūras. "Microsoft" palaikymo inžinieriai gali padėti paaiškinti konkrečios procedūros funkcijas. Tačiau jie nekeis šių pavyzdžių, kad suteiktų papildomų funkcinių galimybių arba sukurtų procedūras, atitinkančias jūsų konkrečius reikalavimus. Norėdami pasiruošti įgyvendinti kurį nors iš toliau pateiktų pavyzdžių, pirmiausia atlikite šiuos veiksmus:
-
Paleiskite "Excel" ir atidarykite naują darbaknygę.
-
Paspauskite ALT + F11, kad paleistumėte "Visual Basic" rengyklę.
-
Meniu Įterpimas spustelėkite Modulis.
-
Įveskite makrokomandos kodo pavyzdį į modulio lapą.
-
Paspauskite ALT + F11, kad grįžtumėte į "Excel".
-
"Microsoft Office Excel 2003" ir ankstesnėse "Excel" versijose meniu Įrankiai pasirinkite Makrokomanda, tada spustelėkite Makrokomandos."Microsoft Office Excel 2007" skirtuko Programų kūrėjas grupėje Kodas spustelėkite Makrokomandos. Jei skirtukas Programų kūrėjas nepasiekiamas, apsvarstykite galimybę atlikti šiuos veiksmus: a. Spustelėkite "Microsoft Office" mygtuką, tada spustelėkite "Excel" parinktys.b. Kategorijos Populiaru dalyje Populiariausios darbo su "Excel" parinktys spustelėkite, kad pasirinktumėte Rodyti Skirtukas Programų kūrėjas juostelėje, tada spustelėkite Gerai.
-
Pasirinkite norimą makrokomandą ir spustelėkite Vykdyti.
Ypatybė Įrašyta grąžina reikšmę False, jei darbaknygėje buvo atlikti pakeitimai po paskutinio įrašymo.Galite naudoti rezervuotą paprogramės pavadinimą Auto_Close, kad nurodytumėte makrokomandą, kuri turėtų būti vykdoma kiekvieną kartą uždarius darbaknygę. Tai darydami galite valdyti, kaip dokumentas tvarkomas, kai vartotojas uždaro dokumentus programoje "Excel".
1 pavyzdys: uždarykite darbaknygę neįrašę pakeitimų
Jei norite, kad darbaknygė būtų uždaryta neįrašant jokių pakeitimų, tos darbaknygės Visual Basic modulyje įveskite šį kodą:
Sub Auto_Close()
ThisWorkbook.Saved = True
End Sub
Kai ypatybė Įrašyta nustatyta kaip Teisinga, "Excel" reaguoja taip, lyg darbaknygė jau buvo įrašyta ir po paskutinio įrašymo neįvyko jokių pakeitimų.Programos ypatybė DisplayAlerts gali būti naudojama tam pačiam tikslui. Pvz., ši makrokomanda išjungia DisplayAlerts, uždaro aktyvią darbaknygę neįrašydama keitimų ir vėl įjungia DisplayAlerts.
Sub CloseBook()
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
End Sub
Taip pat galite naudoti metodo Close argumentą SaveChanges.Ši makrokomanda uždaro darbaknygę neįrašydama keitimų:
Sub CloseBook2()
ActiveWorkbook.Close savechanges:=False
End Sub
2 pavyzdys: uždarykite darbaknygę ir įrašykite keitimus
Jei norite, kad darbaknygė įrašytų keitimus, tos darbaknygės "Visual Basic" modulyje įveskite šį kodą:
Sub Auto_Close()
Jei ThisWorkbook.Saved = False Then
ThisWorkbook.Save End If
End Sub
Šis antrinis procesas tikrina, ar failo įrašyta ypatybė nustatyta kaip False. Jei taip, po paskutinio įrašymo darbaknygė buvo pakeista ir šie pakeitimai įrašomi.
