Code for email alerts from excel isn't working, wrong code possibly?

I am trying to set up automated emails to be sent from excel 30 days before staff are due to go on their statutory and mandatory training. I have used this thread as a starting point and it has been a huge help to me.

http://www.excelforum.com/excel-prog...ication-2.html

I've tried to change the code to suit the needs of my database, however it doesn't seem to be working.

I have a column to identify the date they completed the training course, and next to that I have a column with a date when the course is next due.

Here is the code I have currently:

Please Login or Register  to view this content.

I have also attached the database. At the minute I am only working on "Sheet 1" and the first 'due date' column even though there are several sheets and several columns, the idea is to have it on them all, but first it has work! Also each 'due date' column is designated to a different member of staff, would I need to have a different code for every person, indicating a different email address? If so, do I just put it under the above code?

Thanks in advance.

Jess

A few questions.
Did you write this code yourself or are you trying to adapt it to your needs? If so, I think you would be better off starting from scratch.
When do you want to run this macro? Can you put those peoples emails in the workbook so that you can reference them when needed?

What I meant by the emails in a worksheet was, to create a new worksheet(You could hide it) and put the emails in there. From that you could have the macro search for the recipient and not have to write extra code for each individual. Or , if there was not many people to email to, just include those emails in the macro itself? What are you thoughts? Anyway try this starters. This will email to one person.

Please Login or Register  to view this content.

Make sure you test this with your email first. Change this line in the code to represent your email address.

Please Login or Register  to view this content.