ich möchte in VBA in einem Makro für Outlook das hochzählen eine Integer-Variablen
am Bildschirm anzeigen, quasi als Fortschrittsindikator. Wie geht das?
Vielen Dank für einen Tipp
Sub Test()
Dim zaehler As Long, ZaehlerMax As Long
ZaehlerMax = 100000
Application.DisplayStatusBar = True
For zaehler = 1 To ZaehlerMax
Application.StatusBar = "Datei " & zaehler & " von " & ZaehlerMax & " wird bearbeitet"
'Code für Datei löschen
Next
'Statusbar wieder auf Standardanzeige zurücksetzen
Application.StatusBar = False
MsgBox "Fertig!"
End Sub
Gruß
Franz
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen