Date and Time Functions : Date Type « Data Type « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Data Type
3. Date Type

Date and Time Functions

 
Sub dateFunctions()
   Dim strDateString As String

   strDateString = "The present date and time is: " & Now & vbCrLf & _
                   "Today's date is: " & Date & vbCrLf & _
                   "The day of the month is: " & Day(Date) & vbCrLf & _
                   "The day of the week is: " & Weekday(Date) & vbCrLf & _
                   "The name of the week day is: " & WeekdayName(Weekday(Date)) & vbCrLf & _
                   "The weekday abbreviated is: " & WeekdayName(Weekday(Date), True) & vbCrLf & _
                   "The month is: " & Month(Date) & vbCrLf & _
                   "The name of the month is: " & MonthName(Month(Date)) & vbCrLf & _
                   "The month abbreviated is: " & MonthName(Month(Date), True) & vbCrLf & _
                   "The year is: " & Year(Date)

   msgBox strDateString
End Sub

 

Related examples in the same category