Saber usar macros do Excel para forçar o recálculo de uma planilha garante que as fórmulas em suas pastas de trabalho estão produzindo valores precisos. Excel calcula automaticamente as fórmulas , por padrão , o que pode resultar em longos tempos de processamento para pastas de trabalho com muitas fórmulas . Mudar para cálculo manual resolve este problema , mas cria o problema de fórmulas imprecisas. VBA Macros do Excel pode restaurar , temporária ou permanentemente , o cálculo automático . Uma vantagem de usar macros para recalcular em oposição a reativar a opção de cálculo automático é que você pode escolher exatamente quais células para recalcular , o que evita os atrasos criados pelo cálculo en planilha inteira. Instruções
1
Clique no botão " Opções" do menu " Arquivo", clique no link " fórmulas" . Clique na opção "Manual" , depois em " OK " para fechar a caixa de diálogo "Opções" . Esta etapa é desligado o cálculo automático , que sua macro irá restaurar
2
Digite o seguinte em células de A1 a C1 da planilha atual : . " . = A1 * a2" 5, 10, Observe que a fórmula em C1 está incorreta , devido a sua seleção da opção manual na primeira etapa. Sua macro irá restaurar o cálculo automático .
3
Clique no botão " desenvolvedores" da aba " Visual Basic " para entrar no ambiente de programação Visual Basic. Cole o seguinte programa na janela que aparecer . Este programa usa o objeto "Range " para entrar valores em duas células da planilha diferentes , e uma fórmula para outra célula. O programa tem duas declarações que forçam a planilha atual para atualizar o seu cálculo . O primeiro é " Application.Calculation = xlCalculationAutomatic . " Esta declaração define a propriedade " Cálculo " da aplicação Excel em si . O segundo é o de chamar a função " Calcular " do objeto " ActiveSheet " . Esta declaração diz apenas a folha activa de calcular, não o livro inteiro .
Public Sub recalc ()
'Digite os números em uma célula
' Digite um calulation que depende em recálculo Força esses números
'
Application.Calculation = xlCalculationAutomatic
Range (" a1" ) = 5
Range (" A2 ") = 10
Range (" A3 " ) . Formula = " = a1 * a2"
ActiveSheet.Calculate
End Sub
4
Imprensa "F5" para executar o programa .
5
Clique no ícone " Excel " na barra de tarefas do Windows para retornar ao Excel . Observe que a célula A3 tem uma função que requer o cálculo atualizado, e que o resultado do cálculo , o produto de dois principais células da planilha , é preciso.