Vba: come utilizzare mm/gg/aaaa come formato data
È possibile utilizzare la proprietà NumberFormat in VBA per formattare i valori della data utilizzando il formato mm/gg/aaaa .
Ecco un modo comune per farlo in pratica:
SubFormatDates ()
Dim i As Integer
For i = 2 To 11
Range(" A " & i).NumberFormat = " mm/dd/yyyy "
Next i
End Sub
Questa particolare macro formatterà ciascuna delle date nell’intervallo A2:A11 in formato mm/gg/aaaa .
L’esempio seguente mostra come utilizzare questa sintassi nella pratica.
Esempio: come utilizzare mm/gg/aaaa come formato data in VBA
Supponiamo di avere il seguente elenco di date in Excel:
Diciamo che vogliamo formattare ciascuna delle date nella colonna A utilizzando il formato mm/gg/aaaa .
Per fare ciò possiamo creare la seguente macro:
SubFormatDates ()
Dim i As Integer
For i = 2 To 11
Range(" A " & i).NumberFormat = " mm/dd/yyyy "
Next i
End Sub
Quando eseguiamo questa macro, riceviamo il seguente output:
Tieni presente che ciascuna delle date nella colonna A ora utilizza il formato mm/gg/aaaa .
Tieni presente che utilizzando mm e gg nel formato, forziamo la visualizzazione di tutti i mesi e i giorni con due cifre.
Ad esempio, la data 3 marzo 2023 viene visualizzata come 01/03/2023 .
Se lo desideri, puoi invece utilizzare m/g/aaaa come formato per visualizzare una singola cifra se il giorno o il mese ha una sola cifra:
SubFormatDates ()
Dim i As Integer
For i = 2 To 11
Range(" A " & i).NumberFormat = " m/d/yyyy "
Next i
End Sub
Quando eseguiamo questa macro, riceviamo il seguente output:
Le date sono ora formattate per visualizzare solo il numero minimo di cifre necessarie per rappresentare con precisione giorni e mesi.
Ad esempio, la data 3 marzo 2023 viene visualizzata come 3/1/2023 .
Nota : è possibile trovare la documentazione completa per la proprietà NumberFormat in VBA qui .
Risorse addizionali
I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:
Come confrontare le date in VBA
Come convertire la stringa fino ad oggi in VBA
Come calcolare i giorni tra due date in VBA