Automatic email sending?

[EARTHWALKER]

Hi excel gurus Do any of you know if there's a way where, once
spreadsheet has been updated, an automatic note or an email can be sen
to people telling them that x spreadsheet has been updated?

Even perhaps once you've updated the spreadsheet, you could have
macro which sends out lots of net send commands to inform people?

Would be really handy

 

[Don Guillett]

http://www.rondebruin.nl/

 

[EARTHWALKER]

I wouldn't have a clue on where to start there m8.

Where's Ron or Frank when you need them :

 

[Ron de Bruin]

Where's Ron or Frank when you need them

Here i am<g>

Which mail program do you use

 

[EARTHWALKER]

Outlook express m8. Version 6, if that makes any difference

 

[Ron de Bruin]

I must go now

I give you a example this evening when i come home

 

[Ron de Bruin]

Hi EARTHWALKER

In OE you must use Sendkeys (not very reliable) to send the mail
Try this small example in the Thisworkbook module

It will send the mail when you save the file.

More info about sending text in the body with OE you can read here
http://www.rondebruin.nl/mail/oebody.htm

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim msg As String
Dim Recipient As String, Subj As String, HLink As String

Recipient = "(e-mail address removed)"
Subj = "Test"
msg = "Hi there the workbook is changed"

HLink = "mailto:" & Recipient & "?"
HLink = HLink & "subject=" & Subj & "&"
HLink = HLink & "body=" & msg
ActiveWorkbook.FollowHyperlink (HLink)
Application.Wait (Now + TimeValue("0:00:02"))
SendKeys "%s", True
End Sub

Maybe you can use CDO to do it
http://www.rondebruin.nl/cdo.htm

You don't see it then when the mail is send with CDO



--
Regards Ron de Bruin
http://www.rondebruin.nl

I must go now

I give you a example this evening when i come home

 

[EARTHWALKER]

Cheers Ron. I'll give that a try.

How would you go about adding more recipients

 

[Ron de Bruin]

Hi EARTHWALKER

Recipient = "(e-mail address removed);[email protected]"

 

[EARTHWALKER]

Ah, I see. Same as you would in the to line, in outlook express. man
thanks Ron