Hej! Ingen färdig funktion men här har du principen för hur det kan gå till.Weekday
Jag håller på att göra en veckoschema (Måndag - Söndag). Skulle vilja veta om det finns någon funktion som jag skickar dagens datum till (+ ev något mer argument) och sedan får tillbaka datumet för denna veckas Måndag, Tisdag , Onsdag osv
Tack på förhandSv: Weekday
<code>
'Loopa bakåt för att hitta senaste måndag
varDatum = Now()
While Weekday(varDatum) <> 2
varDatum = varDatum - 1
Wend
'Loopa framåt för att få ut datum för denna vecka
For I = 1 To 7
MsgBox varDatum + I - 1
Next
</code>
Mvh, Janne