| Lösning |
Det önskade macro behöver att redigeras i den visuella grundläggande redaktören för Excel som att använda kliver efter:
0. Den din reserven överträffar arbetssedeln precis i fall att…,
1. Använd Tools->Macro->Macros->Edit för att redigera din makro i den visuella grundläggande redaktören
2. För ”avsluta suben”, fodra i din makro, tillfogar efter fodra:
Application.OnTime nu + TimeValue (”00:00:05”), ”Save_Exit”,
3. Tillfoga fungera Save_Exit () underifrån, efter precis ”avsluta suben” fodrar av din makro.Exempel 1: Exemplet skar räddning & går ut efter Excel, 5 sekunder efter makroen avslutar spring.
UnderMacro1 ()
'fodra därefter är den faktiska makroen
ActiveCell.FormulaR1C1 = ”detta fungerade exempel!”,
'fodra därefter är appellen till Save_ går ut makro
Application.OnTime nu + TimeValue (”00:00:05”), ”Save_Exit”,
Avsluta suben
Sub Save_Exit ()
Application.Quit
ThisWorkbook.Close SaveChanges:=True
Avsluta suben
Exempel 2: Exemplet skar räddning & går ut efter Excel, 5 minuter efter makroen startar spring. Hitåt överträffa sparar skar alltid om tätt även de macro hängningarna
UnderMacro1 ()
'fodra därefter är appellen till Save_ går ut makro
Application.OnTime nu + TimeValue (”00:05:00”), ”Save_Exit”,
'fodra därefter är den faktiska makroen
ActiveCell.FormulaR1C1 = ”detta fungerade exempel!”,
Avsluta suben
Sub Save_Exit ()
Application.Quit
ThisWorkbook.Close SaveChanges:=True
Avsluta suben
|
