Debug.Print Now
Debug.Print Date
Debug.Print FormatDateTime(Now, vbGeneralDate)
Debug.Print FormatDateTime(Now, vbLongDate)
Debug.Print FormatDateTime(Now, vbLongTime)
Debug.Print FormatDateTime(Now, vbShortDate)
Debug.Print FormatDateTime(Now, vbShortTime)
' *** équivalent des fonctions du dessus ***
Debug.Print Format$(Now, "dd/mm/yyyy hh:nn:ss")
Debug.Print Format$(Now, "dd/mm/yyyy")
Debug.Print Format$(Now, "dd/mm/yyyy hh:nn:ss")
Debug.Print Format$(Now, "dddd dd mmmm yyyy")
Debug.Print Format$(Now, "hh:nn:ss")
Debug.Print Format$(Now, "dd/mm/yyyy")
Debug.Print Format$(Now, "hh:nn")