A função VBA Round arredonda um número para o número especificado de casas decimais.
Round(número, número_de_sinais_decimais)
Usando a função Round para arredondar um número para 2 casas decimais:
Sub RoundExample1() number = 12.3456 round = Round(number, 2) MsgBox round 'Retorna às 12h35 End Sub
Usando a função Round para arredondar diferentes valores numéricos:
Sub RoundExample2() MsgBox Round(14.2) 'Retorna: 14 MsgBox Round(-14.2) 'Retorna: -14 MsgBox Round("14.2") 'Retorna: 14 MsgBox Round("-14.2") 'Retorna: -14 MsgBox Round(9.5) 'Retorna: 10 MsgBox Round(-9.5) 'Retorna: -10 MsgBox Round(1.25, 1) 'Retorna: 1,2 MsgBox Round(50, 1) 'Retorna: 50 MsgBox Round(4532.6351, 2) 'Retorna: 4532,64 End Sub