Kā pārtraukt "Saglabāt izmaiņas" uzvedne aizverot darbgrāmatu programmā Excel


Kopsavilkums


Programmā Microsoft Excel, varat izveidot Microsoft Visual Basic for Applications (VBA) makro, kas izlaiž "Saglabāt izmaiņas" uzvedne aizverot darbgrāmatu. To var izdarīt, norādot rekvizītā Darbgrāmata saglabāto stāvokli vai atcelts visi brīdinājumi darbgrāmatu.

Papildinformācija


Microsoft piedāvā programmēšanas piemērus norāda tikai kā piemēru, nesniedzot nekādas tiešas vai netiešas garantijas. Tas ietver, bet neaprobežojas ar netiešām garantijām par piemērotību pārdošanai vai atbilstību noteiktam mērķim. Šajā rakstā tiek pieņemts, ka pārzināt programmēšanas valodu, kas tiek aprakstīta, un rīkus, kas tiek izmantoti, lai izveidotu un atkļūdotu procedūras. Microsoft atbalsta inženieri var palīdzēt izskaidrot kādas noteiktas procedūras funkcionalitāti. Taču viņi nemainīs šos piemērus, lai sniegtu skaidrākus, un neveidos jaunas procedūras, kas atbilstu īpašām prasībām. Izmantot kādu no šiem piemēriem, rīkojieties šādi:
  1. Startējiet programmu Excel un atveriet jaunu darbgrāmatu.
  2. Nospiediet taustiņu kombināciju ALT + F11, lai palaistu Visual Basic redaktoru.
  3. Izvēlnē Ievietot noklikšķiniet uz modulis.
  4. Ievadiet moduļa lapā makro koda paraugs.
  5. Nospiediet taustiņu kombināciju ALT + F11, lai atgrieztos programmā Excel.
  6. Programmā Microsoft Office Excel 2003 un vecākās programmas Excel versijās izvēlnē Rīki norādiet uz makro un pēc tam noklikšķiniet uz makro. Programmā Microsoft Office Excel 2007, noklikšķiniet uz makroIzstrādātājs TABPiezīme grupā kods Ja cilne Izstrādātājs nav pieejama, apsveriet šādas darbības:
    1. Noklikšķiniet uz pogas Microsoft Office un pēc tam noklikšķiniet uz opcijas Excel.
    2. Kategorijas pamata sadaļā Svarīgākās opcijas darbā ar Excelatzīmējiet izvēles rūtiņu Rādīt lentē izstrādātāja cilni un pēc tam noklikšķiniet uz Labi.
  7. Atlasiet makro un pēc tam noklikšķiniet uz palaist.
Saglabātās rekvizīts atgriež vērtību False , ja darbgrāmatā ir veiktas izmaiņas kopš pēdējās saglabāšanas. Subroutine rezervēts vārds "Auto_Close" var izmantot, lai norādītu makro, kas ir jāpalaiž ikreiz, kad darbgrāmata ir aizvērta. Tā rīkojoties, varat kontrolēt, kā dokuments tiek apstrādāts, lietotājam ir pabeigta un ir norādīts Excel aizveriet dokumentu.

1. piemērs: Aizveriet darbgrāmatu bez izmaiņu saglabāšanas

Lai aizvērtu, saglabājot izmaiņas darbgrāmatas, darbgrāmatas Visual Basic modulī ievadiet šādu kodu:
Sub Auto_Close()    ThisWorkbook.Saved = TrueEnd Sub
Saglabātās rekvizīts ir iestatīts uz True, jo Excel atbild darbgrāmata jau ir saglabāta un bez izmaiņām ir notikušas, kopš pēdējo reizi, saglabāt. Programmas rekvizītu var izmantot to pašu mērķi. Piemēram, šo makro izslēdz DisplayAlerts aizver aktīvo darbgrāmatu bez izmaiņu saglabāšanas un pēc tam ieslēdz DisplayAlerts vēlreiz.
Sub CloseBook()    Application.DisplayAlerts = False    ActiveWorkbook.Close    Application.DisplayAlerts = TrueEnd Sub
Varat arī izmantot SaveChanges arguments Aizvērt metodes. Šis makro aizver darbgrāmatu bez izmaiņu saglabāšanas:
Sub CloseBook2()    ActiveWorkbook.Close savechanges:=FalseEnd Sub

2. piemērs: Aizvērt darbgrāmatu un saglabāt izmaiņas

Lai panāktu, ka darbgrāmatas, lai saglabātu izmaiņas, darbgrāmatas Visual Basic modulī ievadiet šādu kodu:
Sub Auto_Close()    If ThisWorkbook.Saved = False Then        ThisWorkbook.Save    End IfEnd Sub
Šī subprocedure pārbauda, ja failu saglabāta rekvizīts ir iestatīts uz False. Šādā gadījumā darbgrāmata ir mainīta kopš pēdējās saglabāšanas, un šīs izmaiņas ir saglabātas.