leta fram vilken veckodag det är nu med DatePart("w", Date(), 2) och ta det minus 7.
Hur många dagar kvar till söndag?
5 svar · 281 visningar · startad av nisslass
glöm denna.....
Weekday(date, [firstdayofweek])
vbMonday = 2
så då blir det
Weekday(Date(), 2)
Måndag blir en 1:a och söndag en 7:a
så det blir väll
iDaysLeft = 7 - Weekday(Date(), 2)
Så..
kakan .Expires = date + iDaysLeft
Om iDaysLeft = 0 så
iDaysLeft = "1"
Vill att kakan ska gå ut kl 00:00 natten mot måndag..
Fungerar detta?
Kör jag minus 8 idag retuneras en 1:a.
Är det så jag får fram dagar kvar till Måndag?
Hjälp?!