Tässä artikkelissa opimme, miten Excelin läheinen työkirja onnistuu Microsoft Excel 2010: n VBA: n avulla.
Kun VBA -makro / koodi on suorittanut kaikki vaaditut toiminnot, haluat makron joko tallentavan tiedoston tai ohittavan sen tallentamisen. Joten tässä on vaihtoehdot, jotka voit asettaa koodiin ja pyytää sitä sulkemaan tiedoston. VBA: n Sulje ja Avaa -menetelmää voidaan käyttää työkirjojen sulkemiseen ja avaamiseen.
Jos haluat koodin vain sulkevan tiedoston tallentamatta muutoksia - käytä tätä riviä koodin lopussa tai missä tahansa -
ActiveWorkbook.Close (väärä) tai ActiveWorkbook.Close False tai ActiveWorkbook.CloseSaveChanges: = EPÄTOSI
Katso koodi tässä kuvassa alla. Jos haluat kopioida koodin, paina näppäimistön Alt + F11 -näppäintä ja varmista, että Excel -taulukko on auki. Napsauta sitten hiiren kakkospainikkeella Microsoft Excel -objekteja ja valitse Lisää. Napsauta sitten Moduuli. Kopioi kuvan alla oleva koodi -
Vaihtoehto Selkeä
Alamakro1 ()
ActiveWorkbook.Close False
End Sub
Huomautus: Voit muuttaa ActiveWorkbook -tekstin viittaamaan työkirjan nimeen tai muuttujaan, jota käytit työkirjan tunnistamiseen koodisi mukaan.
Jos haluat koodin tallentavan muutokset tiedoston sulkemisen aikana, käytä
ActiveWorkbook.Close (True) tai ActiveWorkbook.Close True tai ActiveWorkbook.Sulje SaveChanges: = TOSI
Tässä on koodi -
Vaihtoehto Selkeä
Alamakro1 ()
ActiveWorkbook.Close True
End Sub
Jos kuitenkin haluat käyttäjän päättävän, sinun on vain syötettävä
ActiveWorkbook.Sulje
Tässä on koodi -
Vaihtoehto Selkeä
Alamakro1 ()
ActiveWorkbook.Sulje
End Sub
Käyttäjä saa ponnahdusikkunan, jossa kysytään, haluavatko he tallentaa työkirjan vai eivät.
Työkirjat ("File1.XLS"). Sulje SaveChanges: = False
Tämä esimerkki sulkee File1.xls -tiedoston ja hylkää kaikki siihen tehdyt muutokset.
Johtopäätös:
Jos "Application.DisplayAlerts" -asetukseksi on määritetty False, et saa ponnahdusikkunoita ja työkirja sulkeutuu suoraan ilman tallentamista.
Tämä ponnahdusikkuna tulee näkyviin, jos "Application.DisplayAlerts" ei ole asetettu arvoon False missään ennen Excel vba Activeworkbook.Close -koodiriviä.
Joten vaikka koodi vaatii hälytysten poistamisen käytöstä, varmista, että "Application.DisplayAlerts = True" on läsnä ennen Activeworkbook.Close -riviä.
Jos pidit blogistamme, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa, täydentää tai innovoida työtämme ja parantaa sitä sinulle. Kirjoita meille osoitteeseensähköpostisivusto