diff --git a/Date-et-heure.md b/Date-et-heure.md index cba0b9b..fe4640c 100644 --- a/Date-et-heure.md +++ b/Date-et-heure.md @@ -10,4 +10,24 @@ ``` +----- + + +#### Fonction retournant une date en fonction du numero de semaine de l'année et l'année + +*Paramètre d'entré : weekNumber (numéro de la semaine 1-52)* +*Paramètre d'entré : year (année 2018,2019 etc)* +*Paramètre de sortie : Date* +``` vbnet + Public Shared Function GetWeekStartDate(weekNumber As Integer, year As Integer) As Date + Dim startDate As New DateTime(year, 1, 1) + Dim weekDate As DateTime = DateAdd(DateInterval.WeekOfYear, weekNumber - 1, startDate) + Return DateAdd(DateInterval.Day, (-weekDate.DayOfWeek) + 1, weekDate) + End Function +``` + + +----- + + ###### *Si vous avez des sugestions d'ajouts, de corrections, m'en faire part Merci* \ No newline at end of file