Wenn Sie ein großes vba-Makro / Code haben, das viele Minuten lang ausgeführt werden muss, können Sie den Cursor für den Zeitraum, in dem das Makro ausgeführt wird, auf die Sanduhr oder den wartenden Cursor (basierend auf Ihrer Systemeinstellung) ändern. Sobald das Makro fertig ist, kann der Cursor wieder auf den Standardcursor zurückgesetzt werden.

Dies ist ein Beispielcode, der zeigt, wie Sie den Cursor ändern können.

Option Explicit

_Sub macro1 () _

Application.Cursor = xlWait

’Code here

Application.Cursor = xlDefault

End Sub Nach den dim-Anweisungen (dieser Beispielcode hat noch keine) setzen wir Application.Cursor = xlWait * am Anfang des Codes.

  • Dann können Sie den Code einfügen, den Sie zum Ausführen benötigen. Wenn Sie mehrere Subs / Prozeduren aufrufen müssen, können Sie dies hier tun oder einfach den gesamten Code hier eingeben.

Kurz vor der End Sub-Anweisung müssen Sie den Cursor auf den Standardwert zurücksetzen. Wir tun dies mit der Zeile Application.Cursor = xlDefault *

__

Sie können alle anderen Anweisungen, die Sie benötigen, wie Application.ScreenUpdating = False_or_Application.DisplayAlerts = False _along, in die _Application.Cursor = xlWait_statement aufnehmen. Ebenso können Sie _Application.ScreenUpdating = True oder Application.DisplayAlerts = True zusammen mit der Anweisung Application.Cursor = xlDefault * einfügen.

__

  • Um diesen Code zu kopieren, drücken Sie die Tasten Alt + F11 auf der Tastatur. Dadurch wird das Codemodul geöffnet. Auf der linken Seite sehen Sie Microsoft Excel-Objekte. Klicken Sie mit der rechten Maustaste und wählen Sie Einfügen und dann Modul. Kopieren Sie den Code in das Codefenster rechts.