Makros werden häufig erstellt, um Daten zu verarbeiten, und die Verarbeitung von Daten kann oft lange dauern. Aus diesem Grund denken einige Benutzer möglicherweise, dass ihr Computer nicht mehr reagiert, obwohl das Makro gerade damit beschäftigt ist, seine festgelegte Aufgabe zu erledigen.

Die Lösung für die meisten Makroentwickler besteht darin, Benutzer auf den Fortschritt des Makros aufmerksam zu machen. Es gibt zwei Möglichkeiten, wie Sie dies in Excel tun können. Der einfachste und gebräuchlichste Ansatz besteht darin, in der Statusleiste anzuzeigen, was das Makro tut. Sie müssen lediglich eine Zeichenfolge zusammenstellen, die die Statusmeldung enthält, und diese Zeichenfolge dann der StatusBar-Eigenschaft des Anwendungsobjekts zuweisen, wie hier gezeigt:

sStatus = "Processing Input File - Please Be Patient"

Application.StatusBar = sStatus

Die Nachricht bleibt in der Statusleiste, bis Sie sie mit einer anderen Nachricht überschreiben. Sie können den Fortschritt in einer Schleife auch anzeigen, indem Sie den Prozentsatz vollständig angeben:

For x = 1 to y     Application.StatusBar = Format(x/y,"0.0%") & " Complete"

' Other coding here Next

Wenn Ihre Routine beendet ist, kehren Sie mit der folgenden Anweisung zur normalen Statusleiste zurück:

Application.StatusBar = False

Wenn Sie lieber eine tatsächliche Fortschrittsanzeige für das Makro entwickeln möchten, können Sie dies tun, indem Sie eine UserForm erstellen und dann das Formular aktualisieren, um einen „Prozentbalken“ oder eine andere visuelle Anzeige anzuzeigen. Ein Beispiel für diese Art von Fortschrittsanzeige finden Sie unter folgender Adresse:

https://www.excel-easy.com/vba/examples/progress-indicator.html

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (8969) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier: