Como usar a função vba formatcurrence?

A função VBA FORMATCURRENCY está listada na categoria de conversão de tipo de dados das funções VBA. Quando você o usa no código VBA, ele retorna uma string aplicando o formato de moeda a um número . Em termos simples, você pode converter um número em um valor no qual o formato da moeda é aplicado.

Sintaxe

FormatCurrency(Expression,[NumDigitsAfterDecimal],[IncludeLeadingDigit],[UseParensForNegativeNumbers],[GroupDigits])

Argumentos

• Expressão : o valor numérico que você deseja formatar como moeda.
• [NumDigitsAfterDecimal] : Um valor numérico para especificar casas decimais [Este é um argumento opcional e, se omitido, o padrão é -1].
• [IncludeLeadingDigit] : um valor de enumeração para especificar se um zero à esquerda deve ser exibido [Este é um argumento opcional e, se omitido, vbUseDefault por padrão].
  • vbFalse: não deve ser precedido de zero.
  • vbTrue: exibe um zero à esquerda.
  • vbUseDefault: usa configurações padrão.
• [UseParensForNegativeNumbers] : um valor de enumeração para especificar se os números negativos devem ser colocados entre parênteses [Este é um argumento opcional e é omitido vbUseDefault por padrão].
  • vbFalse: para não colocar números negativos entre parênteses.
  • vbTrue: coloque números negativos entre parênteses.
  • vbUseDefault: usa configurações padrão.
• [GroupDigits] : n valor de enumeração para especificar se o número deve ser agrupado (em milhares, etc.), usando o delimitador de grupo especificado na localidade do computador [Este é um argumento opcional e, se omitido, vbUseDefault por padrão].
  • vbFalse: para não usar os números do grupo.
  • vbTrue: para usar dígitos de grupo.
  • vbUseDefault: Usa as configurações padrão do computador.

Exemplo

Para entender de forma prática como usar a função VBA FORMATCURENCY, você precisa seguir o exemplo abaixo, onde escrevemos um código VBA usando-a:

 Sub example_FORMATCURRENCY() Range("B1").Value = FormatCurrency(Range("A1")) End Sub

No código acima, usamos FORMATCURRENCY para converter o valor na célula A1 em um valor monetário e ele retornou na célula B1 com cifrão.

Comentários

• O símbolo monetário utilizado depende das configurações do sistema.
• Se o valor especificado for diferente de um número ou string que não pode ser reconhecido como um número, o VBA retornará o erro de tempo de execução 13.