Application.ScreenUpdating-Eigenschaft (Excel)

True, wenn die Bildschirmaktualisierung aktiviert ist. Boolescher Wert mit Lese-/Schreibzugriff.

Syntax

expression.ScreenUpdating

expression Eine Variable, die ein Application-Objekt darstellt.

Bemerkungen

Deaktivieren Sie die Bildschirmaktualisierung, um Ihren Makrocode zu beschleunigen. Sie werden nicht in der Lage sein zu sehen, was das Makro vornimmt, aber es wird schneller ausgeführt.

Denken Sie daran, die Eigenschaft ScreenUpdating wieder auf True festzulegen, wenn Ihr Makro beendet wird.

Beispiel

In diesem Beispiel wird gezeigt, wie das Deaktivieren der Bildschirmaktualisierung Ihren Code schneller machen kann. In diesem Beispiel wird jede Spalte auf „Sheet1“ ausgeblendet, während die Zeit nachverfolgt wird, in der diese Aktion vorgenommen wird. Beim ersten Mal werden die Spalten im Beispiel ausgeblendet, wobei die Bildschirmaktualisierung aktiviert wird, beim zweiten Mal wird die Bildschirmaktualisierung deaktiviert. Wenn Sie dieses Beispiel ausführen, können Sie die entsprechenden Ausführungszeiten vergleichen, die im Meldungsfeld angezeigt werden.

Dim elapsedTime(2) 
Application.ScreenUpdating = True 
For i = 1 To 2 
 If i = 2 Then Application.ScreenUpdating = False 
 startTime = Time 
 Worksheets("Sheet1").Activate 
 For Each c In ActiveSheet.Columns 
 If c.Column Mod 2 = 0 Then 
 c.Hidden = True 
 End If 
 Next c 
 stopTime = Time 
 elapsedTime(i) = (stopTime - startTime) * 24 * 60 * 60 
Next i 
Application.ScreenUpdating = True 
MsgBox "Elapsed time, screen updating on: " & elapsedTime(1) & _ 
 " sec." & Chr(13) & _ 
 "Elapsed time, screen updating off: " & elapsedTime(2) & _ 
 " sec."

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.