En vecka framåt!

[Coffer]

Hejsan!

 

Jag skulle vilja veta hur man gör för att hålla en artikel "levande" i en vecka framåt. Jag har ett artikelsystem, som markeras med en pilsymbol. Om artikeln är ett dygn gammalt skrivs en röd pil ut. Är artikeln en vecka gammal skrivs en grön pil ut och är artikeln äldre än en vecka skrivs en grå pil ut.

 

Det förstnämnda och det sistnämnda exemplet har jag löst, men hur gör man för att få veckopilen att skrivas ut?

 

Antagligen skall man skriva något liknande:

 

If Now = problem then

 

... resultatet

 

End If

 

Någon som har ett förslag? Det bästa är om kodsnutten görs global, så den går att återanvända till fler exempel!

 

[Coffer]

Hmm... kom just på... kan det vara så här man gör?

 

If Now < DateAdd("d", 7, FormatDateTime(LastPosted("StringDate"),2)) Then

   Color = "#53532B"

End If

 

Jag hoppas att detta löser det.