FUNÇÃO DE CONVERSÃO - CCUR

Ccur

    Função empregada para converter um valor numérico ou expressão que resulte em um valor numérico, em um valor monetário, arredondado para quatro casas decimais, utilizando a seguinte sintaxe:

Ccur(Expressão)

Onde, 

• Expressão: argumento obrigatório que deve ser avaliado para um valor numérico entre – 922.337.203.685.477,5808 a 922.337.203.685.477,5807. 

As seguintes considerações são válidas para a função Ccur: 

• Empregue a função Ccur() para arredondar números decimais para quatro casas decimais antes de efetuar operações matemáticas complexas ou sucessivas, evitando a ocorrência de arredondamento em seu código;
• Ccur pode receber valores empregando diferentes tipos de separadores de milhar e decimais, com ou sem um caractere monetário adicionado como sufixo ou prefixo, desde que os mesmos estejam de acordo com as definições de localização atualmente empregadas pelo Windows;
• Se Expressão contiver um número com mais de quatro casas decimais, Ccur irá arredondar a parte decimal, empregando as seguintes regras:

• Se o quinto caractere decimal for maior que 5 (>0.00006), quarto decimal será arredondado para o próximo valor inteiro;
• Se o quinto caractere decimal for menor que 5 (<0.00004), quarto decimal será arredondado para o valor inteiro imediatamente anterior;
• Se o quinto caractere decimal for igual a 5 (0.0005), quarto decimal será arredondado para o próximo número inteiro par. 

Exemplo: Os exemplos a seguir demonstram como a função Ccur pode ser empregada para converter diversos valores decimais ou string em valores monetários válidos:

Dim curValor as Currency

curValor = Ccur (“123.456789) ‘Retorna 123.4568
curValor = Ccur (1.12305) ‘Retorna 1.1230
curValor = Ccur (1.12315) ‘Retorna 1.1232

Até a Próxima!!