Funkcja DatePart
Funkcja DatePart zwraca określoną część dnia.
DatePart (interval As String, date As Date [, firstDayOfWeek As Integer [, firstWeekOfYear As Integer]]) As Long
Zwracana wartość:
Wyodrębniona część dla podanej daty.
 interval – wyrażenie tekstowe z poniższej tabeli określające przedział dat.
  
    | interval (wartość ciągu) | Znaczenie | 
  
    | yyyy | Rok | 
  
    | q | Kwartał | 
  
    | m | Miesiąc | 
  
    | y | Dzień roku | 
  
    | w | Dzień tygodnia | 
  
    | ww | Tydzień roku | 
  
    | d | Dzień | 
  
    | h | Godzina | 
  
    | n | Minuta | 
  
    | s | Sekunda | 
 
 date – data, od której obliczany jest wynik.
Literały daty pozwalają określić jednoznaczne zmienne daty, które są niezależne od bieżącego języka. Literały są ujęte między znakami krzyżyka #. Możliwe formaty to:
    - 
        #yyyy-mm-dd# 
- 
        #mm/dd/yyyy# 
 
 firstdayofweek: opcjonalny parametr określający początkowy dzień tygodnia.
  
    | Wartość firstdayofweek | Znaczenie | 
  
    | 0 | Użyj domyślnej wartości systemowej | 
  
    | 1 | niedziela (domyślnie) | 
  
    | 2 | poniedziałek | 
  
    | 3 | wtorek | 
  
    | 4 | środa | 
  
    | 5 | czwartek | 
  
    | 6 | piątek | 
  
    | 7 | sobota | 
 firstweekofyear: opcjonalny parametr określający początkowy tydzień roku.
  
    | Wartość firstweekofyear | Znaczenie | 
  
    | 0 | Użyj domyślnej wartości systemowej | 
  
    | 1 | Pierwszym tygodniem roku jest tydzień zawierający dzień 1 stycznia (wartość domyślna) | 
  
    | 2 | Pierwszym tygodniem roku jest pierwszy tydzień, który obejmuje co najmniej cztery dni tego roku | 
  
    | 3 | Pierwszym tygodniem roku jest pierwszy tydzień, który obejmuje wyłącznie dni nowego roku | 
 
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