Заданный макрос быть отредактированным в редакторе Excel Visual основном используя following шаги:
0. Подпорка ваша первенствует worksheet как раз в случае если…
1. Используйте Tools->Macro->Macros->Edit для того чтобы редактировать ваш макрос в визуально основном редакторе
2. Перед «линией конца Sub» в вашем макросе, добавьте following линию:
Application.OnTime теперь + TimeValue («00:00:05»), «Save_Exit»
3. Добавьте функцию Save_Exit () from below, сразу после «линия конца Sub» вашего макроса.Пример 1: Following пример сохранит & выйдет Excel 5 секунд после того как макрос закончит побежать.
Sub Macro1 ()
'следующей линией будет фактический макрос
ActiveCell.FormulaR1C1 = «этот работаемый пример!»
'следующей линией будет звонок к макросу выхода Save_
Application.OnTime теперь + TimeValue («00:00:05»), «Save_Exit»
Подводная лодка конца
Sub Save_Exit ()
Application.Quit
ThisWorkbook.Close SaveChanges:=True
Подводная лодка конца
Пример 2: Following пример сохранит & выйдет Excel 5 MINUT после того как макрос начнет побежать. Эта дорога, архив первенствовать всегда будет закрывать even if макрос висит
Sub Macro1 ()
'следующей линией будет звонок к макросу выхода Save_
Application.OnTime теперь + TimeValue («00:05:00»), «Save_Exit»
'следующей линией будет фактический макрос
ActiveCell.FormulaR1C1 = «этот работаемый пример!»
Подводная лодка конца
Sub Save_Exit ()
Application.Quit
ThisWorkbook.Close SaveChanges:=True
Подводная лодка конца
|
