Vba: como usar mm/dd/aaaa como formato de data

Você pode usar a propriedade NumberFormat no VBA para formatar valores de data usando o formato mm/dd/aaaa .

Aqui está uma maneira comum de fazer isso na prática:

 SubFormatDates ()

Dim i As Integer

For i = 2 To 11
    Range(" A " & i).NumberFormat = " mm/dd/yyyy "
Next i

End Sub

Esta macro específica formatará cada uma das datas no intervalo A2:A11 para ter um formato mm/dd/aaaa .

O exemplo a seguir mostra como usar essa sintaxe na prática.

Exemplo: como usar mm/dd/aaaa como formato de data em VBA

Suponha que temos a seguinte lista de datas no Excel:

Digamos que queremos formatar cada uma das datas na coluna A usando o formato mm/dd/aaaa .

Podemos criar a seguinte macro para fazer isso:

 SubFormatDates ()

Dim i As Integer

For i = 2 To 11
    Range(" A " & i).NumberFormat = " mm/dd/yyyy "
Next i

End Sub

Quando executamos esta macro, recebemos a seguinte saída:

Observe que cada uma das datas na coluna A agora usa o formato mm/dd/aaaa .

Observe que ao usar mm e dd no formato, forçamos todos os meses e dias a serem exibidos com dois dígitos.

Por exemplo, a data 3 de março de 2023 é exibida como 01/03/2023 .

Se desejar, você pode usar m/d/yyyy como formato para exibir um único dígito se o dia ou mês tiver apenas um dígito:

 SubFormatDates ()

Dim i As Integer

For i = 2 To 11
    Range(" A " & i).NumberFormat = " m/d/yyyy "
Next i

End Sub

Quando executamos esta macro, recebemos a seguinte saída:

As datas agora estão formatadas para exibir apenas o número mínimo de dígitos necessários para representar dias e meses com precisão.

Por exemplo, a data 3 de março de 2023 é mostrada como 01/03/2023 .

Nota : Você pode encontrar a documentação completa da propriedade NumberFormat no VBA aqui .

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

Como comparar datas em VBA
Como converter string para data em VBA
Como calcular dias entre duas datas em VBA