Funzione DatePart
La funzione DatePart restituisce la parte specificata di una data.
DatePart (intervallo As String, date As Date [, firstDayOfWeek As Integer [, firstWeekOfYear As Integer]]) As Long
Valore restituito:
La parte estratta per la data specificata.
 interval - Espressione stringa tratta dalla tabella seguente che specifica l'intervallo di date.
  
    | interval (valore stringa) | Spiegazione | 
  
    | yyyy | Anno | 
  
    | q | Trimestre | 
  
    | m | Mese | 
  
    | y | Giorno dell'anno | 
  
    | w | Giorno della settimana | 
  
    | ww | Settimana dell'anno | 
  
    | d | Giorno | 
  
    | h | Ora | 
  
    | n | Minuto | 
  
    | s | Secondo | 
 
 data - La data dalla quale viene calcolato il risultato.
I valori letterali di data consentono di specificare variabili di data non ambigue indipendenti dalla lingua in uso. I valori letterali sono racchiusi tra i simboli cancelletto #. I formati possibili sono:
    - 
        #yyyy-mm-dd# 
- 
        #mm/dd/yyyy# 
 
 firstdayofweek: (PrimoGiornoSettimana) parametro facoltativo che specifica il giorno iniziale della settimana.
  
    | valore firstdayofweek | Spiegazione | 
  
    | 0 | Usa il valore predefinito di sistema | 
  
    | 1 | Domenica (predefinito) | 
  
    | 2 | Lunedì | 
  
    | 3 | Martedì | 
  
    | 4 | Mercoledì | 
  
    | 5 | Giovedì | 
  
    | 6 | Venerdì | 
  
    | 7 | Sabato | 
 firstweekofyear: un parametro facoltativo che specifica la settimana iniziale dell'anno.
  
    | valore firstweekofyear | Spiegazione | 
  
    | 0 | Usa il valore predefinito di sistema | 
  
    | 1 | La settimana 1 è quella che comprende il 1° gennaio (predefinito) | 
  
    | 2 | La settimana 1 è la prima settimana che comprende quattro o più giorni di quell'anno | 
  
    | 3 | La settimana 1 è la prima settimana che comprende solo giorni del nuovo anno | 
 
Sub example_datepart
    MsgBox DatePart("ww", #01/02/2005#) ' displays 2 because weeks start on Sunday
    MsgBox DatePart("ww", #12/31/2005#) ' displays 53
    MsgBox DatePart(date:=#2005-12-30#, interval:="q") ' displays 4
End Sub