0134-Desabilitando a atualização de tela durante a execução de uma macro

A versão mais comum das macros é aquela em que vemos tudo que se passa durante a execução. Desta forma a cada passo executado é possível observar, por exemplo, células sendo formatadas, linhas sendo excluídas, etc.

É possível inibir esta atualização utilizando a linha de comando:

Application.ScreenUpdating = False

A seguir um exemplo de código que permite decidir se haverá, ou não, a atualização das informações na tela. Nos testes que conduzi utilizando o Excel 2010, obtive um tempo de 0.0000 seg quando é feita a opção pelo congelamento de tela e de 1.0101 seg quando a macro é executada sem a atualização.

Sub InserirValores()

Dim rg      As Range
Dim rgRef   As Range
Dim Start   As Date
Dim Finish  As Date
Dim Perg    As Double

Perg = MsgBox("Deseja congelar a exibição de tela?", vbYesNo)

If Perg = vbYes Then Application.ScreenUpdating = False

ActiveSheet.Cells.Clear

Start = Time

Set rgRef = [A1:T25]

For Each rg In rgRef
rg = rg.Row + rg.Column
rg.Font.Name = "Courier New"
rg.Font.Color = vbRed
rg.Font.Size = 20
rg.Font.Bold = True
rg.Interior.Color = vbYellow
Next rg

Finish = Time

MsgBox "Tempo de processamento= " & Format(Finish - Start, "s.ssss") & " seg"

ActiveSheet.Cells.Clear

Application.ScreenUpdating = True

End Sub

In Excel We Trust

Marcado com: , , ,
Publicado em Nível: Avançado
4 comentários em “0134-Desabilitando a atualização de tela durante a execução de uma macro
  1. Marcos disse:

    Incrível, eu tenho uma macro que leva aproximadamente 30 minutos para ser executada.
    Ao acrescentar o congelamento de tela, ela levou 6 minutos para rodar.

    Muito obrigado.

  2. Me ajudou muito essa dica! Parabéns!! E muito obrigado

  3. bbom disse:

    nice informative post. another knowledgeable one.

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s

Visitas dos usuários
  • 1,963,899

Clique para assinar este blog e receber notificações de novos artigos por email.

Junte-se a 1.476 outros seguidores

Aumente sua interação

Siga-nos do twitter (@usuariosdoexcel).

Acesse o nosso fórum e compartilhe as suas dúvidas.

Curta nossa página no Facebook.

Junte-se ao grupo do LinkedIn.

Visite-nos utilizando o seu smartphone ou tablet.

Recomende este Blog
Visualizar notícias
Site monitorado:
Real Time Web Analytics

Clicky

%d blogueiros gostam disto: