How to send mails from Excel using Outlook

[Elsie]

Sponsored Links

Has anybody already tried mailing from Excel?

I have an Excel spreadsheet with a button inside. This button activates a macro that sends the active sheet attachment via Outlook. The problem is that Excel, via function xlDialogSendMail, calls Outlook. Then asks me to click send and I send the mail without opening Outlook.

Do any one have experience in this field?

My code for the button:

Private Sub CommandButton1_Click() 

Dim Destination As String 
Dim Source As String 

Destination = "destination@free.com" 
Source = "Source mail" 

ActiveWorkbook.SendMail Destination, Source, False 

End Sub

I get a warning in this code.

[Lemog]

I will say it as a mistake because it could not automatically create the message.
Basically ensure that it is outlook and not excel that triggers the sending?

[XSI]

I know about this message. I have already done some research and found that it is a security introduced with SP3 for Office 2003. I have installed "Express ClickYes" software designed to automatically click YES.