Mega Code Archive

 

Categories / VisualBasic Script / Date Functions

 

Prints the Quarter Number

Sub DatePartExample()     Debug.Print DatePart("Q", Now) End Sub