VBA to Email Attachment

[Jim Palmer]

I have a macro that emails monthly reports to several department heads.

Does anyone know if there is a way to prevent the message "A program i
tyring to automatically send email on your behalf ... if this i
unexpected it could be a virus" ?

I have to press "yes" each time, and the macro sends reports to man
addresses.

I understand the need for this security, however I would think there i
some way to advise the computer "it's okay, it's me".

Any assistance would be appreciated.

The code I use follows:

Sub SendReports()


Dim ol As Object, myItem As Object
Set ol = CreateObject("outlook.application")


MyText = Range("Email_Comment").Value



Set myItem = ol.CreateItem(olMailItem)
myItem.To = "email address"
myItem.Subject = "Subject Line"
myItem.Body = MyText
myItem.Body = myItem.Body & "" & Chr(13) & Chr(13)

Set myAttachments = myItem.Attachments
myAttachments.Add "Path name of file to attach"
myItem.Send


' Other addresses and attachments are entered here

Set ol = Nothing


End Su

 

[Paul B]

Jim, I think this would be set in outlook and not excel, I don't use
outlook, but in outlook express there is a option under tools options
security, that has warn me when other applications try to send mail, if you
uncheck it you will not get the message, maybe outlook has something like
this

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2000 & 97
** remove news from my email address to reply by email **

 

[keepITcool]

Jim,
you'll need a utility to circumvent this outlook object model protection

see: http://www.dimastr.com/redemption




keepITcool

< email : keepitcool chello nl (with @ and .) >
< homepage: http://members.chello.nl/keepitcool >

 

[Tom Ogilvy]

Ron de Bruin has an approach that uses CDO rather than you mail software.
See his discussion at his site:

Ron de Bruin's site

http://www.rondebruin.nl/sendmail.htm
http://www.rondebruin.nl/index.html

an Article by Ron on MSDN:
http://msdn.microsoft.com/library/en-us/odc_xl2003_ta/html/odc_xlmail.asp

The index should lead you there. The article is for interest although not
particularly directly appropriate.