Usuários do Excel
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Performance

Ir para baixo

Performance Empty Performance

Mensagem por alexandrevba Seg Out 06, 2014 4:19 pm

Boa tarde!!

Boas maneiras para melhorar a performance de suas Macros
Código:
Sub Performance()
   With Application
       .ScreenUpdating = False
       .Calculation = xlCalculationManual
       .EnableEvents = False
       .DisplayAlerts = False
   End With
    'Seu Código insira Aqui!!!
   With Application
       .ScreenUpdating = True
       .EnableEvents = True
       .DisplayAlerts = True
       .Calculation = xlCalculationAutomatic
   End With
End Sub

Att
alexandrevba
alexandrevba
Intermediário
Intermediário

Mensagens : 222
Data de inscrição : 26/06/2012
Localização : Serra-ES

Ir para o topo Ir para baixo

Ir para o topo


 
Permissões neste sub-fórum
Não podes responder a tópicos