Date Functions VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Date Functions
  4. Prints the Quarter Number
Sub DatePartExample()
    Debug.Print DatePart("Q", Now)
End Sub