Quick and Easy answer needed - my mind has gone blank!

[Tjtrev89]

Hi Folks

I'm wanting to create a button in excel that, when clicked by the user, will automatically send an email from their outlook to a specified address.

I also want to have the subject field and email content already formatted and chosen by myself.

Finally if this could be done automatically without them having to see the email itself, that would be great.

Can someone please provide assistance with the code? I've done things very similar to this in the past, but my mind has gone blank.

Thanks for any help!

 

[Comfy]

This should have all the detail you need:

Mail from Excel with Outlook (VBA)

 

[Tjtrev89]

Thanks I now have woking code for excel and also for the same function in Powerpoint.

However, the email body still appears and the user has to select to send.

Can anyone recommend how i make it more automated?

Here is the code I'm using:


Sub _Click()

Dim olApp As Object, olMail As Object
Set olApp = CreateObject("Outlook.Application")
Set olMail = olApp.CreateItem(0)
olMail.To = "reciepient.somewhere.com"
olMail.Subject = "Test"
olMail.Body = "Test"

olMail.display


End Sub

 

[Comfy]

Change

oMail.display

to

oMail.Send