Create Table with quartils

[vangog]

I will upload it later (tomorow probably), but not here, the file is too big. I could paste my code here and send you the link to download the data.

At least one problem I have solved. This is code to convert date to week no.

TheDay = CDbl(Selection.Range("A5"))
weekNo = (TheDay - 43831) / 7
' if weekNo > 1.1.2021 and weekNo<1.1.2022
If (TheDay > 44196) And (TheDay < 44562) Then
  weekNo = weekNo - (44562 - 44196) ' weekNo -= 365
End If