[Resolvido]Arredondar campo independente

Boa Tarde

Tenho esta formula num Form continuo, num campo independente.
=(Arredondado(nz([USD])*nz([cambio])))

Da-me valores deste tipo mas eu queria arredondar assim.

Exemplos:
516 para 520
526 para 530
531 para 535

Obrigado

Num modulo;

Public Function Arredonda(varNumero As Variant) As Long
'By JPaulo ® Maximo Access
On Error Resume Next
If IsNumeric(varNumero) Then
Arredonda = -Int(-varNumero / 5) * 5
End If
End Function


=(Arredonda(nz([USD])*nz([cambio])))

Boa noite JPaulo

E obrigado funfa perfeito

Obrigado pelo retorno Assis.