From ad7514bcb27fa084d1ec88e54f65e9bc830952f4 Mon Sep 17 00:00:00 2001 From: Th3maz1ng Date: Mon, 18 Mar 2019 17:02:16 +0100 Subject: [PATCH] Update page 'Date et heure' --- Date-et-heure.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Date-et-heure.md b/Date-et-heure.md index ee2a916..df2a0bc 100644 --- a/Date-et-heure.md +++ b/Date-et-heure.md @@ -3,7 +3,7 @@ *Paramètre d'entré : rien* *Paramètre de sortie : Date* -``` VBS +``` VBA Public Shared Function GetDateWithDayAsMonday() As Date Return Today.AddDays((Today.DayOfWeek - DayOfWeek.Monday) * -1) End Function