Como calcular valores de células em vba?

Por padrão no Excel, sempre que você altera o valor de uma célula, o Excel recalcula todas as células que possuem uma dependência de cálculo nessa célula. Mas ao usar o VBA, você tem a opção de alterá-lo para manual, como fazemos no Excel.

Usando o método de cálculo VBA

Você pode alterar o cálculo para manual antes de iniciar qualquer código, conforme segue.

 Application.Calculation = xlManual

Quando você executa este código, ele altera o cálculo para manual.

E no final do código você pode usar a seguinte linha de código para mudar para automático.

 Application.Calculation = xlAutomatic

Você pode usar o cálculo da seguinte maneira.

 Sub myMacro()    Application.Calculation = xlManual           'your code goes here       Application.Calculation = xlAutomatic End Sub

Calcule agora (todas as pastas de trabalho abertas)

Se você deseja apenas recalcular todas as pastas de trabalho abertas , você pode usar o método “Calcular” conforme abaixo.

 Calculate

Use o método de cálculo para uma planilha

Da seguinte maneira, você pode recalcular todos os cálculos para todos

 ActiveSheet.Calculate Sheets("Sheet1").Calculate

A primeira linha do código recalcula para a planilha ativa e a segunda linha faz isso para “Planilha1”, mas você pode alterar a planilha se desejar.

Calcular para um único intervalo ou célula

Da mesma forma, você pode recalcular todos os cálculos para um intervalo específico ou uma única célula da seguinte maneira.

 Sheets("Sheet1").Range("A1:A10").Calculate Sheets("Sheet1").Range("A1").Calculate