望ましいマクロは次のステップを使用して勝のVisual Basicエディターで編集される必要がある:
0。 バックアップは万が一…ワークシートを勝る
1。 Visual Basicエディターのマクロを編集する使用Tools->Macro->Macros->Edit
2。 マクロの「終り潜水艦」のラインの前に、次のラインを追加しなさい:
今Application.OnTime + TimeValue (「00:00:05」)、「Save_Exit」
3。 マクロの「終り潜水艦」のラインの直後の機能Save_Exitを()下方から、追加しなさい。例1: 次の例はマクロがランすることを終わった5秒後及び出口Excel保存する。
補助的なMacro1 ()
「次のラインは実際のマクロである
ActiveCell.FormulaR1C1は= 「この例働いた!」
「次のラインはSave_の出口のマクロへ呼出しである
今Application.OnTime + TimeValue (「00:00:05」)、「Save_Exit」
端の潜水艦
補助的なSave_Exit ()
Application.Quit
ThisWorkbook.Close SaveChanges:=True
端の潜水艦
例2: 次の例はマクロがランし始めた5分後及び出口Excel保存する。 こうすればは、勝ファイルマクロがハングしても常に閉じる
補助的なMacro1 ()
「次のラインはSave_の出口のマクロへ呼出しである
今Application.OnTime + TimeValue (「00:05:00」)、「Save_Exit」
「次のラインは実際のマクロである
ActiveCell.FormulaR1C1は= 「この例働いた!」
端の潜水艦
補助的なSave_Exit ()
Application.Quit
ThisWorkbook.Close SaveChanges:=True
端の潜水艦
|
