Come utilizzare la funzione dateserial in vba (con esempio)
È possibile utilizzare la funzione DateSerial in VBA per restituire una data per un giorno, mese e anno specifici.
Ecco un modo comune per utilizzare questa funzione nella pratica:
SubUseDateSerial ()
Dim i As Integer
For i = 2 To 13
Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
End Sub
Questa particolare macro restituirà valori di data nell’intervallo D2:D13 utilizzando i valori dell’anno nella colonna C, i valori del mese nella colonna B e i valori del giorno nella colonna A.
L’esempio seguente mostra come utilizzare nella pratica la funzione DateSerial .
Esempio: come utilizzare la funzione DateSerial in VBA
Supponiamo di avere le seguenti colonne in Excel che visualizzano il giorno, il mese e l’anno per date diverse:
Supponiamo di voler visualizzare i valori della data nella colonna D, utilizzando i valori di giorno, mese e anno in ciascuna riga.
Per fare ciò possiamo creare la seguente macro:
SubUseDateSerial ()
Dim i As Integer
For i = 2 To 13
Range(" D " & i) = DateSerial(Range(" C " & i), Range(" B " & i), Range(" A " & i))
Next i
End Sub
Quando eseguiamo questa macro, riceviamo il seguente output:
La colonna D mostra il valore della data risultante dall’utilizzo dei valori di giorno, mese e anno rispettivamente delle colonne A, B e C.
Nota : qui è possibile trovare la documentazione completa per la funzione VBA DateSerial .
Risorse addizionali
I seguenti tutorial spiegano come eseguire altre attività comuni in VBA:
Come confrontare le date in VBA
Come convertire la data in numero della settimana in VBA
Come calcolare i giorni tra due date in VBA