Compartir vía

Propiedad Application.ScreenUpdating (Excel)

  • Artículo

True si la actualización de pantallas está activada. Boolean de lectura y escritura.

Sintaxis

expresión. ScreenUpdating

expresión Variable que representa un objeto Application.

Comentarios

Desactive la actualización de pantallas para acelerar el código de la macro. No podrá ver lo que hace la macro, pero se ejecutará más rápidamente.

Recuerde volver a establecer la propiedad ScreenUpdating en True cuando finalice la macro.

Ejemplo

En este ejemplo, se muestra cómo desactivar la actualización de pantallas para acelerar la ejecución del código. Se oculta cada segunda columna en Sheet1, mientras se hace un seguimiento del tiempo que lleva esta acción. La primera vez que en el ejemplo se ocultan las columnas, la actualización de pantallas está activada, la segunda vez, está desactivada. Al ejecutar este ejemplo, puede comparar los tiempos de ejecución correspondientes, que se muestran en el cuadro de mensaje.

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."

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.