Anzeigeaktualisierung
01.06.2021 19:47:57
Dieter
in einer Schleife will ich den Fortschritt durch Einblenden des Schleifenzähler auf einem Arbeitsblatt darstellen. Um die Schleife schnell zu machen, setze ich diese Prozedur ein:
Sub Gnl_BckOff()
With Application
.ScreenUpdating = False
.Cursor = xlWait
.DisplayAlerts = False
.EnableEvents = False
.DisplayStatusBar = False
.Calculation = xlCalculationManual
End With
End Sub
Damit der aktuelle Schleifenzähler sichtbar wird, setze ich diese Prozedur ein:
Sub Gnl_BckOff()
With Application
.ScreenUpdating = False
.Cursor = xlWait
.DisplayAlerts = False
.EnableEvents = False
.DisplayStatusBar = False
.Calculation = xlCalculationManual
End With
End Sub
gefolgt von Gnl_BckOff. Das führt nicht zu dem gewüschten Erfolg.Wer von Euch hat eine Idee?
Schon jetzt Danke
Dieter