Para acelerar o processamento das macros é recomendado desativar a
atualização de tela, para tanto basta desativar no início do código e reativar
no final, da seguinte maneira:
Application.ScreenUpdating = False
‘Insira o código desejado
Application.ScreenUpdating = True
35. Calculo manual (Melhorar desempenho)
Outra maneira de agilizar as macros é desativando o cálculo automático no
início e reativando no final.
Obs: Utilizando o cálculo manual, Sempre que um cálculo precisar ser
realizado em uma planilha, deve-se utilizar o comando:
“ActiveSheet.Calculate”
Application.ScreenUpdating = False
‘Insira o código desejado
Application.ScreenUpdating = True
36. Copiar e colar corretamente (Melhorar desempenho)
Copiar e colar através de VBA é extremamente simples, porém a maioria dos
usuários utilizam mais memória do que o necessário para realizar este
método, realizando da seguinte maneira:
Range(“B1”,”B3”).Copy
Range(“C1”).Select
ActiveSheet.Paste
Entretanto existe uma maneira direta de copiar e colar sem utilizar a “Área de
transferência”, para isso basta utilizar o código a seguir com o mesmo efeito
das três linhas anteriores.
Range(“B1”,”B3”).Copy Destination:=Range("C1")