L'informatique à votre portée
L'informatique prêt-à-porter

Faites appel à moi pour vos formations
sur les dpts 81, 31, 82, 11 et 67 (Strasbourg)
Confiez moi vos développements Office

FacebookTwitterGoogle BookmarksLinkedin

Accélérer ses procédures et faire patienter l'utilisateur

Imprimer E-mail
5 mars 2014

Si votre procédure est un peu longue vous pouvez d'une part l'accélérer et d'autre part faire patienter l'utilisateur.
Pour accélérer le code (dans Excel et Word), évitez de mettre à jour l'écran :
Application.ScreenUpdating = False
En fin de procédure ajouter l'instruction suivante pour permettre l'actualisation de l'affichage :
Application.ScreenUpdating = True

Pour faire patienter l'utilisateur, affichez le curseur d'attente :

Attente

Normal

Excel Application.Cursor = xlWait Application.Cursor = xlNormal
Word System.Cursor = wdCursorWait System.Cursor = wdCursorNormal
Access Application.Screen.MousePointer = 11 Application.Screen.MousePointer = 0

Dans le cas de Word, lorsque votre code est terminé, le curseur redevient normal.
Dans Excel et Access, le curseur reste dans l'état où vous l'avez mis, faites donc bien attention à mettre en fin de procédure les instructions pour rétablir le curseur normal.