Vba: como arredondar valores para 2 casas decimais

Você pode usar os seguintes métodos para arredondar valores para 2 casas decimais usando VBA:

Método 1: arredondar um valor para 2 casas decimais

 Sub RoundTwoDecimals()
    Range(" B2 ") = WorksheetFunction.Round(Range(" A2 "), 2)
End Sub

Este exemplo específico arredondará o valor na célula A2 para duas casas decimais e exibirá o valor arredondado na célula B2 .

Método 2: arredonde todos os valores do intervalo para 2 casas decimais

 Sub RoundTwoDecimals()
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Round(Range(" A " & i), 2)
    Next i
End Sub

Este exemplo específico arredondará cada valor no intervalo A2:A9 para duas casas decimais e exibirá os valores arredondados no intervalo B2:B9 .

Os exemplos a seguir mostram como usar cada método na prática.

Exemplo 1: Arredondar um valor para 2 casas decimais

Podemos criar a seguinte macro para arredondar o valor na célula A2 para duas casas decimais e exibir o resultado na célula B2 :

 Sub RoundTwoDecimals()
    Range(" B2 ") = WorksheetFunction.Round(Range(" A2 "), 2)
End Sub

Quando executamos esta macro, recebemos a seguinte saída:

Observe que o valor 15,248 na célula A2 foi arredondado para duas casas decimais (15,25) na célula B2 .

Exemplo 2: Arredonde todos os valores do intervalo para 2 casas decimais

Podemos criar a seguinte macro para arredondar cada um dos valores do intervalo A2:A9 para duas casas decimais e exibir os valores arredondados do intervalo B2:B9 :

 Sub RoundTwoDecimals()
    Dim i As Integer

    For i = 2 To 9
        Range(" B " & i) = WorksheetFunction.Round(Range(" A " & i), 2)
    Next i
End Sub

Quando executamos esta macro, recebemos a seguinte saída:

Observe que cada valor no intervalo A2:A9 foi arredondado para duas casas decimais e os valores arredondados são exibidos no intervalo B2:B9 .

Nota : Você pode encontrar a documentação completa do método VBA Round aqui .

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

Como arredondar valores em VBA
Como arredondar valores em VBA