Het Huis van de Software van HiTek
 
Titel Red en ga automatisch Excel na het runnen van een macro weg
Bijgewerkte datum 09/14/2008
Beïnvloede versies 4.0 en later
Beïnvloed OS Allen
Beschrijving De gebruiker moet de Macro van Excel in werking stellen.  Dan sparen en ga het Werkboek van Excel weg.
Oorzaken -
Oplossing De gewenste macrobehoeften die in de Visuele BasisRedacteur worden moeten uitgegeven die van Excel de volgende stappen gebruikt:
0.  Uw de steun blinkt aantekenvel uit enkel voor het geval dat…
1.  Gebruik Tools->Macro->Macros->Edit om uw macro in de visuele basisredacteur uit te geven
2.  Vóór de Sub“ lijn van het „Eind in uw macro, voeg de volgende lijn toe:
Application.OnTime nu + TimeValue („00:00:05“), „Save_Exit“
3. Voeg de functie Save_Exit () van onderaan, vlak na de Sub“ lijn van het „Eind van uw macro toe.

Voorbeeld 1:  Het volgende voorbeeld zal Excel 5 seconden & weggaan redden nadat de macro eindigt lopend.

Sub Macro1 ()
  de 'volgende lijn is de daadwerkelijke macro
  ActiveCell.FormulaR1C1 = „Dit gewerkte voorbeeld!“
  de 'volgende lijn is de vraag aan de macro van de Uitgang Save_
  Application.OnTime nu + TimeValue („00:00:05“), „Save_Exit“
Sub van het eind

Sub Save_Exit ()
  Application.Quit
  ThisWorkbook.Close SaveChanges:=True
Sub van het eind

Voorbeeld 2:  Het volgende voorbeeld zal Excel 5 minuten & weggaan redden nadat de macro begint te lopen.  Deze manier, blinkt dossier uit altijd zal sluiten zelfs als de macro hangt

Sub Macro1 ()
  de 'volgende lijn is de vraag aan de macro van de Uitgang Save_
  Application.OnTime nu + TimeValue („00:05:00“), „Save_Exit“
  de 'volgende lijn is de daadwerkelijke macro
  ActiveCell.FormulaR1C1 = „Dit gewerkte voorbeeld!“
 Sub van het eind

Sub Save_Exit ()
  Application.Quit
  ThisWorkbook.Close SaveChanges:=True
Sub van het eind

 

Het Logboek van de output niets
Zuiver Logboek

-