Send Email using Gmail to multiple "clients"

Hello everyone.... I need some help on this..... I have this code that is working already.... It will send and email with an attach file to one "client"....

I know that if I want to add more "clients" I just need to input their emails, but I would like to have a worksheet named "Clients" with their emails and this code read those emails and send it automatically. I donīt know if you understand what Iīm trying to do???

Please Login or Register  to view this content.

You can use this code to send Gmail emailīs...... Itīs working perfectly.......

JBeaucaire, I think you miss my point..... Maybe I donīt explained very good......

First -> objEmail.to not objEmail.From

Second -> I want that the code add the emails from a worksheet. Imagine that I have 1000 clients, but in the next 3 months I need to remove 50 and add more 150.... And itīs much more easy to manage the clients in a worksheet than in the code......


But hey..... Thank you very much for your attention.....

Adjust SheetName and Column number

Please Login or Register  to view this content.

bakerman2 thank you very much...... I could not test you solution yet, but tomorrow Iīll try it for sure......

Again, many thanks.....

Hello again.... Need help to change a little thing in the first code I wrote...

If you see, the code mail a specific pdf file.... What I need is that the code mail files of that kind of file (pdf).... Because if I change the name of the file, it won't send the file...

Can you help me on this???

Jbeaucaire thanks for your help....

I want to send one pdf file despite the name.... I can only have one pdf file in the folder....

So, I'll put *.pdf in the code... It will send the file, whatever his name....

bakerman2 - your solution for multiple mail clients works very well.... Many thanks.....

Jbeaucaire - your solution also works great.... Again many thanks.....


I have two more little issues to put this work like a charm....


First - Now I can create a pdf file and send it to multiple clients automatically..... I try it with my mails and work just fine, but the mails went to the spam box.... Do you know why is that???

The attached file is just a simple pdf file... No virus or malware goes with it....


Second - Another "problem" is when I create the pdf file..... This is part of the code:

Please Login or Register  to view this content.

How can I add the value of a cell into the file name???

What I need is save the file like this (FixedFilePathName:="C:\Users\Desktop\xpto + value of the cell A1.pdf")..... In my case the cell value is a date "=today()+1"

Example: C:\Users\Desktop\xpto_01/08/2015.pdf


Can I fix this 2 "problems" easily??? Thank you for any help you can give and most important thank you for your patience......

JBeaucaire, I put your solution about the filename (FixedFilePathName:="C:\Users\Desktop\xpto_" & Format(Date + 1, "MM-DD-YY") & ".pdf") and it works......

But the other suggestion you made earlier about the saving pdf file doesnīt work (objEmail.AddAttachment "C:\Users\123\Desktop\*.pdf")

Run-Time error '-2147024773 (8007007b)':
The filename, directory name, or volume label syntax is incorrect.


I already try to put commas (" * ".pdf), but donīt work either.....

JBeaucaire, I try your last suggestion but donīt either.....

I found a code that already put on road and works....

Please Login or Register  to view this content.

Again, thank you very much for your attention on this.....