L'instruction-macro désiré doit être édité dans l'éditeur de base visuel d'Excel utilisant les étapes suivantes :
0. La sauvegarde votre excellent le tableau juste au cas où…
1. Employez Tools->Macro->Macros->Edit pour éditer votre instruction-macro dans l'éditeur de base visuel
2. Avant la ligne secondaire de « extrémité » dans votre instruction-macro, ajoutez la ligne suivante :
Application.OnTime maintenant + TimeValue ("00 :00 :05 »), « Save_Exit »
3. Ajoutez la fonction Save_Exit () de dessous, juste aprés que la ligne secondaire de « extrémité » de votre instruction-macro.Exemple 1 : L'exemple suivant sauvegardera et quittera l'Excel 5 secondes après que l'instruction-macro finit de fonctionner.
Macro1 secondaires ()
la 'prochaine ligne est l'instruction-macro réel
ActiveCell.FormulaR1C1 = « cet exemple travaillé ! »
la 'prochaine ligne est l'appel à l'instruction-macro de sortie de Save_
Application.OnTime maintenant + TimeValue ("00 :00 :05 »), « Save_Exit »
Sous-marin d'extrémité
Save_Exit secondaire ()
Application.Quit
ThisWorkbook.Close SaveChanges :=True
Sous-marin d'extrémité
Exemple 2 : L'exemple suivant sauvegardera et quittera l'Excel 5 minutes après que l'instruction-macro commence à fonctionner. De cette façon, le fichier d'exceler se fermera toujours même si l'instruction-macro s'arrête
Macro1 secondaires ()
la 'prochaine ligne est l'appel à l'instruction-macro de sortie de Save_
Application.OnTime maintenant + TimeValue ("00 :05 :00 »), « Save_Exit »
la 'prochaine ligne est l'instruction-macro réel
ActiveCell.FormulaR1C1 = « cet exemple travaillé ! »
Sous-marin d'extrémité
Save_Exit secondaire ()
Application.Quit
ThisWorkbook.Close SaveChanges :=True
Sous-marin d'extrémité
|
