Abbiamo già esaminato quali sono le variabili, i tipi di dati e le costanti, nel nostro tutorial VBA Data Types - Variables and Constants. In questo tutorial, tratteremo come dichiarare una variabile come data.
In VBA, il tipo di dati della data viene archiviato come decimale. Sia le date che le ore possono essere memorizzate in questo tipo di dati. Il tipo di dati data VBA può memorizzare valori che vanno dal 1 gennaio 100 al 31 dicembre 9999.
Variabile data VBA
Dichiari una variabile come una data usando la parola chiave Dim:
| 1 | Dim dateUno come Data |
Quindi puoi assegnare una data alla variabile data. Esistono diversi modi per generare date da assegnare alle variabili:
Assegna oggi alla variabile
La funzione Data restituirà la data odierna:
| 123 | Dim dtOggidtToday = Data |
Assegna ora a variabile
La funzione Now restituirà la data odierna e l'ora corrente:
| 123 | Dim dNowdNow = Adesso |
Assegna il tempo alla variabile
La funzione Time restituirà l'ora corrente:
| 123 | Dim tTimetTempo = Tempo |
Assegna una data alla variabile con DateSerial
La funzione DateSerial restituirà una data basata su anno, mese e giorno di input:
| 123 | Dim dsDatedsDate = DateSerial(2010, 11, 11) |
Assegna un tempo alla variabile con TimeSerial
La funzione TimeSerial restituirà un'ora, basata su un'ora, un minuto e un secondo immessi:
| 123 | Dim tsTimetsTime = TimeSerial (10, 10, 45) |
Devi racchiudere le date con il # o ” quando le usi nel tuo codice, come mostrato di seguito:
Funzione DateValue VBA
La funzione VBA DateValue può essere utilizzata per inizializzare una data. Il seguente codice può essere utilizzato per inizializzare una data in VBA:
| 1 | MsgBox DateValue("1/1/2010") |
Funzione TimeValue VBA
| 1 | MsgBox TimeValue("21:30:57") |
Esempio di variabile data VBA di Excel
Questa procedura mostra come creare variabili di data, assegnare loro valori e stamparli in un foglio di lavoro Excel:
| 12345678910111213 | Sub DichiaranteAVariableAsADate()Dim dateUno come dataDim dateDue As DatedataUno = #1/1/2019#dataDue = "1/2/2019"Intervallo ("A1"). Valore = dataUnoIntervallo ("A2"). Valore = dataDueFine sottotitolo |
Il risultato è:
Puoi saperne di più sulle funzioni di data in questo tutorial.
Variabile data VBA in Access
La variabile Data funziona esattamente allo stesso modo in Access VBA come in Excel VBA.
Questa procedura mostra come creare una variabile di data e aggiornare un campo in una tabella di accesso con il valore.
| 12345 | Sub DichiaranteAVariableAsADate()Dim dtWork As DatedtWork = #05/10/2020#DoCmd.RunSql "UPDATE tblJobs SET WorkDate = #" & dtWork & "# WHERE JobNo = 6"Fine sottotitolo |
