Send emails IF set period after a date

Hi Guys,

Not sure how possible this is to do, but I'll give it a go.

I've got a list of data with a date in column B and an email address in column AD (and lots of other data in between). I'd like some sort of VBA code that when the workbook opens up checks the date in column B against the current date and if they are 3weeks apart (21 days) then send an email out (through outlook) to the email address in column AD.

I've put together an email body on tab "Email" and would like some details from the data copied over into certain points in the email. I think I can work out how to do this part myself.. But the actual sending of the emails i'm stumped on.

Any help is greatly appreciated. :D

Okay,

I've managed to get together a code, as below, that works just as I need. I've put a formula in column AE that works out the difference between todays date and original date and then created a set email on the tab "Email".

The problem is this only works for row 2 at the moment. How would I go about looping the code so that it works for around 200 + lines?

Please Login or Register  to view this content.

Any help is extremelly appreciated. Many Thanks.