Funzione Date in VBA (12 usi delle macro con esempi)

Sommario

Nelle applicazioni di Microsoft Visual Basic, le funzioni di data o qualsiasi concetto relativo alla data sono essenziali per eseguire varie operazioni nel vostro set di dati. Potreste trovarvi in varie situazioni in cui dovrete usare queste funzioni. In questo tutorial, imparerete a conoscere la funzione Data di VBA con esempi appropriati e illustrazioni corrette. Inoltre, vi forniremo funzioni di data multipleche potete implementare nel vostro foglio di lavoro.

Scarica il quaderno di esercizi

Usi di VBA Date.xlsm

Introduzione alla funzione Date di VBA

Excel classifica le date nella categoria Data/Ora Si tratta di una funzione integrata che può essere utilizzata nelle macro VBA per eseguire qualsiasi operazione relativa alla data.

Prima di iniziare con la funzione Data, è necessario conoscere la funzione Variabili di data in VBA .

Sintassi

Data()

⏺ Argomenti Spiegazioni

Non ci sono argomenti.

⏺ Restituzioni

Restituisce la data corrente.

⏺ Disponibile in

Excel per Office 365, Excel 2019, Excel 2016, Excel 2013, Excel 2011 per Mac, Excel 2010, Excel 2007, Excel 2003, Excel XP, Excel 2000

Esempio

Come si sa, non ci sono argomenti, si può solo immettere come segue:

 Sub vba_date() Dim current_date As Date current_date = Date MsgBox current_date End Sub

Quando lavoriamo con la funzione Date, non inseriamo alcuna parentesi nei codici VBA come in questo esempio.

Uscita :

12 funzioni di data in VBA da imparare

Nelle prossime sezioni vi mostreremo alcune funzioni aggiuntive per la data che potrete utilizzare per numerosi scopi in VBA. Leggete queste sezioni per conoscere tutti i modi possibili per lavorare con la data in VBA. Vi suggeriamo di tenerle nel vostro arsenale: miglioreranno sicuramente le vostre conoscenze.

1. Funzione DateAdd come Data in VBA

In VBA, si utilizza la funzione DateAdd per aggiungere giorni a una data particolare, restituendo poi la data risultante.

Sintassi:

DateAdd(intervallo, numero, data)

Argomenti:

intervallo: L'espressione di stringa è l'intervallo di tempo che si desidera aggiungere.

numero: Richiesto. È un'espressione numerica che rappresenta il numero di intervalli che si desidera aggiungere. Può essere positiva (per ottenere date nel futuro) o negativa (per ottenere date nel passato).

data: La data/ora originale.

Ora, il intervallo Gli argomenti possono avere le seguenti impostazioni:

aaaa - Anno

q - Trimestre

m - Mese

y - Giorno dell'anno

d - Giorno

w - Giorno feriale

ww - Settimana

h - Ora

n - Minuto

s - Secondo

Snippet di codice :

 Sub dateadd_function() Dim result_Date As Date result_Date = DateAdd("d", 15, "1/31/2022") MsgBox result_Date End Sub

Uscita:

Come si può vedere, ha aggiunto 15 date nella data corrente in VBA.

Per saperne di più: Come utilizzare la funzione IsDate in VBA (3 esempi)

2. Funzione DateDiff in VBA

La funzione DateDiff restituisce una variante (Long) che determina il numero di intervalli di tempo tra due date specificate.

Sintassi :

DateDiff(intervallo, data1, data2, [ primogiornodellasettimana, [ prima settimana dell'anno ]] )

Argomenti:

intervallo: L'espressione stringa è l'intervallo di tempo che si desidera aggiungereL'espressione stringa è l'intervallo di tempo che si utilizza per calcolare la distinzione tra due date.

data1,data2 : Richiesto; Variante (Data). Due date da utilizzare nel calcolo.

primo giorno della settimana: Opzionale. Una costante che definisce il primo giorno della settimana. Se non è fisso, si assume la domenica.

prima settimana dell'anno: Opzionale. Una costante che stabilisce la prima settimana dell'anno. Se non viene impostata, si suppone che la prima settimana sia quella in cui compare il 1° gennaio.

Ora, il intervallo Gli argomenti possono avere le seguenti impostazioni:

aaaa - Anno

q - Trimestre

m - Mese

y - Giorno dell'anno

d - Giorno

w - Giorno feriale

ww - Settimana

h - Ora

n - Minuto

s - Secondo

Il primo giorno della settimana ha queste impostazioni:

vbDomenica - utilizza la domenica come primo giorno della settimana.

vbLunedì - impiega il lunedì come primo giorno della settimana.

vbMartedì - utilizza il martedì come primo giorno della settimana.

vbMercoledì - impiega il mercoledì come primo giorno della settimana.

vbGiovedì - opera il giovedì come giorno della settimana.

vbVenerdì - impiega il venerdì come primo giorno della settimana.

vbSabato - opera il sabato come primo giorno della settimana.

vbUsaSistemaGiornoDellaSettimana - utilizza il primo giorno della settimana definito dall'impostazione del dispositivo.

Il prima settimana dell'anno ha queste impostazioni:

vbPrimoGennaio1 - utilizza la settimana che contiene il 1° gennaio.

vbPrimiQuattroGiorni - impiega la prima settimana che ha almeno quattro giorni nel nuovo anno.

vbPrimaSettimana - opera la prima settimana completa dell'anno.

vbSystem - utilizza la prima settimana dell'anno, come definito dalla posizione del dispositivo.

Snippet di codice:

 Sub DateDiff_Function() Dim result As Long result = DateDiff("d", "1/31/2022", "2/12/2022") MsgBox result End Sub

Uscita :

Alla fine, restituisce la differenza tra le due date in VBA.

Per saperne di più: Come utilizzare la funzione VBA DateDiff in Excel (9 esempi)

3. Funzione DatePart come Data

La funzione DatePart restituisce una variante (intera) contenente la parte definita di una data fornita.

Sintassi :

DatePart(intervallo, data, [ primo giorno della settimana, [ prima settimana dell'anno ]])

Argomenti:

intervallo: L'espressione stringa è l'intervallo di tempo che si desidera aggiungereL'espressione stringa è l'intervallo di tempo che si utilizza per calcolare la distinzione tra due date.

data: Richiesto; Variante (Data). La data che si desidera utilizzare nel calcolo.

primo giorno della settimana: Opzionale. Una costante che definisce il primo giorno della settimana. Se non è fisso, si assume la domenica.

prima settimana dell'anno: Opzionale. Una costante che stabilisce la prima settimana dell'anno. Se non viene impostata, si suppone che la prima settimana sia quella in cui compare il 1° gennaio.

Ora, il intervallo Gli argomenti possono avere le seguenti impostazioni:

aaaa - Anno

q - Trimestre

m - Mese

y - Giorno dell'anno

d - Giorno

w - Giorno feriale

ww - Settimana

h - Ora

n - Minuto

s - Secondo

Il primo giorno della settimana ha queste impostazioni:

vbDomenica - utilizza la domenica come primo giorno della settimana.

vbLunedì - impiega il lunedì come primo giorno della settimana.

vbMartedì - utilizza il martedì come primo giorno della settimana.

vbMercoledì - impiega il mercoledì come primo giorno della settimana.

vbGiovedì - opera il giovedì come giorno della settimana.

vbVenerdì - impiega il venerdì come primo giorno della settimana.

vbSabato - opera il sabato come primo giorno della settimana.

vbUsaSistemaGiornoSettimanale - utilizza il primo giorno della settimana definito dall'impostazione del dispositivo.

Il prima settimana dell'anno ha questi valori:

vbPrimoGennaio1 - opera nella settimana che comprende il 1° gennaio.

vbPrimiQuattroGiorni - utilizza la prima settimana che possiede al massimo quattro giorni sottodimensionati nel nuovo anno.

vbPrimaSettimana - utilizza la prima settimana completa dell'anno.

vbSystem - impiega la prima settimana dell'anno selezionata dalla posizione del dispositivo.

Snippet di codice :

 Sub DatePart_Function() Dim result As Integer result = DatePart("m", "10/11/2022") MsgBox result End Sub

Uscita :

In questo modo, è possibile utilizzare questa funzione di data nei codici VBA.

Per saperne di più: Come usare la funzione VBA FileDateTime in Excel (3 usi)

4. Funzione DateSerial

È possibile visualizzare una data basata su un anno, un mese e un giorno immessi utilizzando il comando DataSeriale funzione.

Sintassi:

Guarda anche: Come inserire un grafico a colonne raggruppate 3D in Excel (con semplici passaggi)

DateSerial(anno, mese, giorno)

Argomenti:

anno - Campo obbligatorio. Un numero compreso tra 100 e 9999, incluso, o un'espressione numerica che simboleggia l'anno.

mese - Campo obbligatorio. Un valore intero che definisce il mese.

giorno - Campo obbligatorio. Un valore intero che descrive il giorno.

Snippet di codice:

 Sub date_serial() Dim date_special As Date date_special = DateSerial(2022, 1, 11) MsgBox date_special End Sub

Uscita :

Per saperne di più: Come usare VBA TimeSerial in Excel (3 esempi)

4. Funzione VBA DateValue

Ora utilizziamo la funzione DateValue per definire una data.

Sintassi :

DateValue(data)

Argomento:

Qui, il data L'argomento è solitamente un'espressione stringa che descrive una data compresa tra il 1° gennaio 100 e il 31 dicembre 9999. In ogni caso, la data può essere un'espressione che può simboleggiare una data, un'ora o sia una data che un'ora in quell'intervallo.

Snippet di codice:

 Sub Date_value() Dim result As Date result = DateValue("10 gennaio 2022") MsgBox result End Sub

Uscita :

Come potete vedere, abbiamo utilizzato con successo la funzione data nei codici VBA.

5. Funzione Giorno in VBA

Restituisce una variante (intero) che determina un numero reale compreso tra 1 e 31, incluso, che indica il giorno del mese.

Sintassi :

Giorno (data)

Argomento:

L'argomento richiesto per la data è una Variante, un'espressione numerica, un'espressione stringa o una combinazione qualsiasi. Rappresenta una data. Se la data include Null, restituirà anche Null.

Snippet di codice:

 Sub day_function() Dim date1, the_day date1 = #12/12/2023# the_day = Day(date1) MsgBox the_day End Sub

Uscita:

Come si può vedere, utilizzando i codici VBA si è scoperto che il giorno della data indicata è 12.

Contenuti correlati: Funzione VBA Format in Excel (8 usi con esempi)

6. Funzione Mese VBA come Data

Restituisce una variante (intero) che definisce un numero reale compreso tra 1 e 12, incluso, che indica il mese dell'anno.

Sintassi :

Mese(data)

Argomento:

L'argomento richiesto per la data è una Variante, un'espressione numerica, un'espressione stringa o una combinazione qualsiasi. Rappresenta una data. Se la data include Null, restituirà anche Null.

Snippet di codice:

 Sub month_function() Dim date1, the_month date1 = #12/12/2023# the_month = Month(date1) MsgBox the_month End Sub

Uscita:

Contenuti correlati: Come utilizzare la funzione VBA Right in Excel (6 esempi)

Letture simili

Come utilizzare la funzione VBA Environ (4 esempi)
Come usare VBA e le funzioni in Excel (4 esempi)
Dichiarazione VBA If - Then - Else in Excel (4 esempi)
Come utilizzare la funzione VBA Abs in Excel (9 esempi)
Come usare la concatenazione in Excel VBA (4 metodi)

7. Funzione NomeMese

Restituisce una stringa che dimostra il mese specificato.

Sintassi :

NomeMese(mese, [ abbreviato ])

Argomento:

mese: Il titolo numerico del mese, ad esempio gennaio è 1, febbraio è 2 e così via.

abbreviare: È facoltativo. Valore booleano che dimostra se il nome del mese deve essere abbreviato. Se viene saltato, il valore predefinito è False, che indica che il nome del mese non viene abbreviato.

Snippet di codice:

 Sub MonthName_Function() Dim month_name As String month_name = MonthName(9, True) MsgBox month_name End Sub

Uscita:

Come si può vedere, abbiamo trovato il nome del mese con questa funzione VBA Date.

8. Funzione giorno della settimana

Restituisce un valore Variante ( Intero ) che possiede un numero reale che esprime il giorno della settimana.

Sintassi :

Giorno della settimana(data, [ primo giorno della settimana ])

Argomento:

data: L'argomento richiesto per la data è una Variante, un'espressione numerica, un'espressione stringa o una combinazione qualsiasi. Rappresenta una data. Se la data include Null, restituirà anche Null.