Como usar a função vba formatnumber?

A função VBA FORMATNUMBER 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 a expressão fornecida aplicando um formato numérico a ela . Em termos simples, o resultado obtido tem um formato numérico como um tipo de dados string.

Sintaxe

FormatNumber(Expressão, [NumDigitsAfterDecimal], [IncludeLeadingDigit],[UseParensForNegativeNumbers], [GroupDigits])

Argumentos

• Expressão : A expressão que você deseja formatar.
• [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, se omitido, o padrão é vbUseDefault).
  • 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 os números do grupo.
  • vbUseDefault: Usa as configurações padrão do computador.

Exemplo

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

 Sub example_FORMATNUMBER() Range("B1").Value = FormatNumber(Range("A1")) End Sub

No código acima, usamos FORMATNUMBER para converter o valor da célula A1 em um valor numérico e retornamos o resultado na célula B1.

Comentários

• 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.