Como usar a função Round no VBA?

A função `Round` no VBA (Visual Basic for Applications) é utilizada para arredondar um número para um determinado número de casas decimais. A sintaxe básica da função `Round` é:

Round(expression, [numdecimalplaces])
  • `expression` é o número que você deseja arredondar.
  • `numdecimalplaces` é opcional. Ele define o número de casas decimais para as quais você deseja arredondar o número. Se omitido, o padrão é 0, o que arredonda o número para o inteiro mais próximo.

Aqui estão alguns exemplos de como usar a função `Round` no VBA:

   Dim numero As Double
   numero = 5.678
   MsgBox Round(numero)  ' Resultado: 6
   Dim numero As Double
   numero = 5.678
   MsgBox Round(numero, 2)  ' Resultado: 5.68
   Dim numero As Double
   numero = 5.678
   MsgBox Round(numero, 0)  ' Resultado: 6
  • Arredondar para o inteiro mais próximo:
  • Arredondar para uma determinada quantidade de casas decimais:
  • Arredondar com zero casas decimais:

Vale a pena notar que a função `Round` em VBA segue a regra de arredondamento chamada “arredondamento bancário”, também conhecida como “arredondamento para par”. Isso significa que, quando um número está exatamente na metade, ele é arredondado para o número par mais próximo. Por exemplo:

Dim numero1 As Double
Dim numero2 As Double

numero1 = 2.5
numero2 = 3.5

MsgBox Round(numero1)  ' Resultado: 2
MsgBox Round(numero2)  ' Resultado: 4

Neste caso, o número 2.5 é arredondado para 2 (o número par mais próximo) e 3.5 é arredondado para 4.

Unlock Your Potential

Excel

Basic - Advanced

Access

Access Basic - Advanced

Power BI

Power BI Basic - Advanced

Help us grow the project