Send email when are date past

Hi,
This is my first post in this forum. I hope to find the answer to my request.
I have a workbook that records incoming mail and each of these mail need to be responded to. I like to have a macro that can automatically send a standard notification email when certain condition are met.
In this workbook the date of receipt of mail is in Col. D and date of Reply in Col. E. If Col E is blank or 30 days later than Col. D a standard email is sent to the email account of the person in Col. F. Col. F shows the email address only.
The body of the email is
Please take note you have not responded to the letter sent by (Col. C addresses) as registered in the Letter Register.
Appreciate all the help I can get.

I like to reiterate that the conditions for which this macro should run are
1. The current date is more than 30 after the date of the receipt of the date as shown in Col. D and if Col. E is blank. This mean only when both conditions are met will this macro execute. This macro should execute once the workbook is open.
I tried the codes it only execute for one row it does not loop through all the rows so that an email is sent whenever the above conditions are met. My data start from row 8 downward. One important thing to consider and that is this macro should stop at the first empty row at the end of the data.

SOS,

All seem to works well based on the current codes. I just like to push the performance a little bit more and that is to enable this macro to run whenever either this file is open or there is any change to the worksheet.

Thanks in advance

SOS,

While running the codes again I noticed this occurrence. If in Col. E somewhere down the line if I have a response date the code will just stop at that row without proceeding down the rows to test if the conditions are met.

Please help.

SOS,

Sorry I off work now, I could only test out the worksheet again to see if I miss anything. Once again you have been a great help and I learned a lot today.

SOS,

I tried running the codes again and I encountered the same problem. I have attached a sample of the working file for you to peruse and see where have I done wrong. I also like to introduce another condition and that if Col F is "Y" then do not sent out the email. This is to remind myself that an earlier email has been sent.

Please Login or Register  to view this content.

SOS,

Finally, I got the macro to work after making some changes and further consultation with other gurus. Below are the codes.

One final part I did not understanding and hopefully I can get some help. You said to put this codes in the Workbook_Open part of your book. Where is this?

Please Login or Register  to view this content.

Thanks guys I was able to use the same code for a very similar situation.
The only thing I am missing is to be able to put multiple email address into the TO: section.

Can anyone give me a clue how to do it? I have tried serveral things, but nothing is working.

Thanks

Nevermind, I was able to figure it out.
In case anyone else needs something similar:

I selected column I as the location of emails that needed to be sent and created variable i.
Then used a max of 2000 lines to check for emails that need to be sent.
Then set .To = abc

Please Login or Register  to view this content.

in the line:

Please Login or Register  to view this content.

you need to put multiple addresses in the cell like this [email protected]; [email protected]; [email protected] and so on
the other option is to change the to line to encompass multiple cells like below:

Please Login or Register  to view this content.

this & "; " & will need to go between each cell you want to add to a particualr email. there is also a variable way to do this so it just sends one email to everyone but this is a longer code involving finding all the emails in an array system storing them and then printing them to one cell that you designate to be the email .to

Hope this helps you out.

It was good, but instead of sending multiple emails, can I have a consolidate emial of all the records.

sanjay

Is there a way to list down all the rows (column 1 to 4) in a consolidated outlook mail, when entries in column (say 7) have past date mentioned in the list.



regards
sanjay