Como usar a função FormatPercent em VBA?

A função `FormatPercent` em VBA (Visual Basic for Applications) é usada para formatar números como porcentagens. Essa função converte um valor numérico em uma string que representa o valor como um percentual, incluindo o símbolo de porcentagem (%). Você pode especificar o número de casas decimais e outros parâmetros de formatação.

Aqui está a sintaxe básica da função `FormatPercent`:

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

Expression: O valor numérico que você deseja formatar como porcentagem.
NumDigitsAfterDecimal (Opcional): O número de casas decimais a serem exibidas (padrão é -1, o que usa a configuração regional do sistema).
IncludeLeadingDigit (Opcional): Um valor que indica se zeros à esquerda devem ser incluídos em frações (padrão é -2, que usa a configuração regional do sistema).
UseParensForNegativeNumbers (Opcional): Um valor que indica se números negativos devem ser incluídos entre parênteses (padrão é -2, que usa a configuração regional do sistema).
GroupDigits (Opcional): Um valor que indica se os números devem ser agrupados usando o separador de milhares (padrão é -2, que usa a configuração regional do sistema).

Aqui está um exemplo de como usar `FormatPercent` em um código VBA:

Sub ExemploFormatPercent()
    Dim valor As Double
    Dim resultado As String

    valor = 0.1234 ' Valor que queremos formatar como porcentagem
    
    ' Formatar como porcentagem com duas casas decimais
    resultado = FormatPercent(valor, 2)
    
    ' Imprimir o resultado na janela Immediate (Ctrl + G para abrir)
    Debug.Print resultado ' Saída: "12,34%"
End Sub

Nesse exemplo, `FormatPercent` converte o valor 0,1234 em “12,34%”. A função é especialmente útil quando você quer apresentar dados numéricos em formato de porcentagem em planilhas ou relatórios gerados por VBA. Se precisar de mais ajustes na formatação, você pode alterar os parâmetros opcionais conforme necessário.

facebooklinkedin