Lorsque vous avez une grosse macro / code vba qui doit s’exécuter pendant plusieurs minutes, vous pouvez remplacer le curseur par le sablier ou le curseur d’attente (en fonction des paramètres de votre système) pour la période d’exécution de la macro. Une fois la macro terminée, le curseur peut être restauré au curseur par défaut.

Ceci est un exemple de code qui montre comment vous pouvez modifier le curseur.

Option Explicit

_Sous macro1 () _

Application.Cursor = xlWait

’Code ici

Application.Cursor = xlDefault

End Sub Après les instructions dim (cet exemple de code n’en a pas encore), nous définissons Application.Cursor = xlWait * au début du code.

  • Ensuite, vous pouvez inclure le code dont vous avez besoin pour exécuter. Si vous devez appeler plusieurs sous-procédures / procédures, vous pouvez le faire ici ou simplement saisir l’intégralité du code ici.

Ensuite, juste avant l’instruction End Sub, vous devez réinitialiser le curseur à la valeur par défaut. Nous faisons cela en utilisant la ligne Application.Cursor = xlDefault *

__

Vous pouvez inclure toutes les autres instructions dont vous avez besoin, telles que Application.ScreenUpdating = False_or_Application.DisplayAlerts = False _en même temps que _Application.Cursor = xlWait_statement. De même, vous pouvez inclure _Application.ScreenUpdating = True ou Application.DisplayAlerts = True avec l’instruction Application.Cursor = xlDefault *.

__

  • Pour copier ce code, appuyez sur les touches Alt + F11 du clavier afin d’ouvrir le module de code. Sur le côté gauche, vous verrez des objets Microsoft Excel. Cliquez avec le bouton droit et sélectionnez Insérer, puis sélectionnez Module. Copiez le code dans la fenêtre de code à droite.