Saberexcel - o site de quem precisa aprender Macros Microsoft Excel VBA
Exemplo da função Format
Este exemplo mostra os diversos usos da função Format para formatar valores, usando formatos nomeados e formatos definidos pelo usuário. Para o separador de data (/), separador de hora (:) e literal AM/ PM, o resultado real formatado, exibido pelo sistema, depende das configurações da localidade em que o código está sendo executado. Ao exibir datas e horas no ambiente de desenvolvimento, são usados os formatos de hora e data abreviados da localidade do código. Quando exibidas pelo código em execução, são usados os formatos de hora e data abreviados da localidade do sistema, que podem ser diferentes da localidade do código. Neste exemplo, foi considerado o inglês dos Estados Unidos.
MyTime e MyDate são exibidas no ambiente de desenvolvimento, usando as configurações de hora e data abreviadas do sistema atual.
Dim MyTime, MyDate, MyStr
MyTime = #17:04:23#
MyDate = #January 27, 1993#
' Retorna a hora atual do sistema no formato longo de hora definido pelo sistema.
MyStr = Format(Time, "Hora longa")
' Retorna a data do sistema atual no formato longo de data definido pelo sistema.
MyStr = Format(Date, "Data longa")
MyStr = Format(MyTime, "h:m:s") ' Retorna "17:4:23".
MyStr = Format(MyTime, "hh:mm:ss AMPM") ' Retorna "05:04:23 PM".
MyStr = Format(MyDate, "dddd, mmm d yyyy") ' Retorna "Quarta-feira, Jan 27 1993".
' Se o formato não for especificado, será retornada uma seqüência de caracteres.
MyStr = Format(23) ' Retorna "23".
' Formatos definidos pelo usuário.
MyStr = Format(5459.4, "##,##0.00") ' Retorna "5.459,40".
MyStr = Format(334.9, "###0.00") ' Retorna "334,90".
MyStr = Format(5, "0.00%") ' Retorna "500,00%".
MyStr = Format("OLÁ", "<") ' Retorna "olá".
MyStr = Format("Isto é tudo", ">") ' Retorna "ISTO É TUDO".
Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
