Mega Code Archive

 

Categories / VisualBasic Script / Date Functions

 

DatePart(q, Now)

Sub dateFunctions2()    Debug.Print "The quarter part is: " & DatePart("q", Now) End Sub