Format – Formatar

Descrição:

A função Format em VBA é uma ferramenta poderosa para manipular e apresentar dados de forma formatada. Ela permite que os desenvolvedores controlem a aparência de valores, como datas, números e strings, de acordo com padrões específicos. Isso é especialmente útil em situações em que é necessário exibir informações de uma maneira específica, como em relatórios, formulários ou interfaces de usuário.
Ao utilizar a função Format, é possível melhorar a legibilidade e a apresentação de dados, tornando-os mais compreensíveis para os usuários finais. Essa função oferece uma ampla gama de opções de formatação, desde datas e horas até moedas e percentuais, proporcionando flexibilidade na exibição de informações em projetos VBA. Dessa forma, a função Format contribui para a criação de interfaces mais profissionais e atraentes em aplicações desenvolvidas em VBA.
Exemplos:

Sub Exemplo1()
    Dim data As Date
    data = DateSerial(2023, 10, 12)
    Dim dataFormatada As String
    dataFormatada = Format(data, "dd/mm/yyyy")
    MsgBox dataFormatada
End Sub
    

Este exemplo formata uma data para o padrão “dd/mm/yyyy”.

Sub Exemplo2()
    Dim numero As Double
    numero = 1234.5678
    Dim numeroFormatado As String
    numeroFormatado = Format(numero, "0.00")
    MsgBox numeroFormatado
End Sub
    

Este exemplo formata um número com duas casas decimais.

Sub Exemplo3()
    Dim texto As String
    texto = "Hello, World!"
    Dim textoFormatado As String
    textoFormatado = Format(texto, ">50")
    MsgBox textoFormatado
End Sub
    

Este exemplo formata uma cadeia de caracteres para ocupar um espaço de 50 caracteres, alinhando à direita.

Sub Exemplo4()
    Dim valor As Currency
    valor = 1234.56
    Dim valorFormatado As String
    valorFormatado = Format(valor, "Currency")
    MsgBox valorFormatado
End Sub
    

Este exemplo formata um valor como moeda.

Sub Exemplo5()
    Dim percentual As Double
    percentual = 0.75
    Dim percentualFormatado As String
    percentualFormatado = Format(percentual, "Percent")
    MsgBox percentualFormatado
End Sub
    

Este exemplo formata um número como um percentual.