Partilhar via

Propriedade Application.ScreenUpdating (Excel)

  • Artigo

True se atualização de tela estiver ativada. Boolean de leitura/gravação.

Sintaxe

expression.ScreenUpdating

expressão Uma variável que representa um Aplicativo objeto.

Comentários

Desabilitar atualização de tela para acelerar o código de macro. Você não conseguirá ver o que a macro está fazendo, mas ela será executada com mais rapidez.

Lembre-se de definir a propriedade ScreenUpdating novamente como True quando a macro terminar.

Exemplo

Este exemplo demonstra como desativar a atualização de tela pode fazer com que seu código seja executado mais rapidamente. O exemplo oculta todas as outras colunas da Planilha1, mantendo o controle do tempo necessário para fazer isso. A primeira vez que o exemplo ocultar as colunas, a atualização de tela será ativada; na segunda vez, a atualização de tela será desativada. Ao executar este exemplo, compare os respectivos tempos de execução que são exibidos na caixa de mensagem.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.