Email Macro

[one_more_cave_dweller]

Is there a way to have a macro send an email without having to open Outlook?

Thanks ray:

 

[Tazguy37]

Yes. Here's some sample code I used to do it:

Dim olMailItem As Variant
Set out = CreateObject("Outlook.Application")

    With out.CreateItem(olMailItem)
        'strEmail = "name@domain.com"           'copy and uncomment these two
        '.Recipients.Add strEmail               'lines to add more recipients
        strEmail = "taz@jdomain.net"        'Sets the recipient string
        .Recipients.Add strEmail                'Adds that recipient to the list
        .Subject = "New"
        .Body = "<\\FILEV02\!GENERAL3\!IT\Logs\" & ActiveWorkbook.Name & ">"
'       link to the file; will need to be changed if folder moves or naming scheme changes
'       If the path and or filename has spaces, you must enclose the entire path/filename in angle brackets (<>)
       .Send
    End With

Hope that helps!

 

[Smitty]

Sure, see www.rondebruin.nl/sendmail.htm

He's got all of the Outlook code you should need.

HTH,

Smitty

 

[Tazguy37]

At times, a little too much, imho. Don't get me wrong, I think it's great that there's so many ways to do it, depending on what you need, but sometimes it's hard to look at all of that and know right off the bat. Or is it just me? ray: (Chanting: We're not worthy! We're not worthy!")

 

[Zack Barresse]

No, I don't believe so. Like both solutions provided above, the one I will give is code that uses outlook, but it must be open for the mail to go out. You can make this 'invisible', but I don't think you can use Outlook to send something if it is not open. I could be wrong.

Here is a link to Daniel Klann's website (the greatest code for emailing in Outlook, imho): http://www.danielklann.com/excel/excelvba.htm . There is also a Knowledge Base entry here: http://www.vbaexpress.com/kb/getarticle.php?kb_id=97 written by DRJ that works pretty well. It's about the same concept as DK's.

His Favourites add-in is a must have! I don't know how I got along without it.

(Heya Smitty/TG!!)

Is there a way to have a macro send an email without having to open Outlook?

Thanks ray:

 

[Zack Barresse]

Btw, if using Outlook and this will be used by multiple users and/or multiple versions, I suggest using Late Binding. Do some reading on it, a board search will wield decent results. DK talks about it a lot.

Good luck! Post back if more help is needed.

 

[whiteghost]

can this be adapted to work with Lotus Notes (Smitty's pet hate email prog) ?
if it could it would save me a lot of work at the end of the month.

 

[Smitty]

HA!

Actually, I can send you some code that I adapted from NateO's original masterpiece, but Nate's is still the best.

Smitty

(Heya fellas!)

 

[whiteghost]

HA!

Actually, I can send you some code that I adapted from NateO's original masterpiece, but Nate's is still the best.

Smitty

(Heya fellas!)

thanks Smitt, I would appreciate that

 

[Smitty]

Check your PM.

Smitty