Returns the current system date as a string, or resets the date. The date format depends on your local system settings.
Date ; Date = Text As String
Text: Only required in order to reset the system date. In this case, the string expression must correspond to the date format defined in your local settings.
Sub ExampleDate MsgBox "The date is " & Date End Sub