Email Question

[Roger]

Hello All,

How can I modify this code to just send the message and not the workbook?
I'm looking for a simple email response where it provides the subject line
I've noted below, but not the workbook attachment.

I've tried several times to alter the code to accommodate this, but I must
be doing something wrong. Also, can you help me craft a line where I can
actually add a message line to the body of the email additionally?

Thanks for your help – Roger

Sub SEND()
Dim Email_WB As Workbook
Dim Persons_Email_Addr As String
Dim Email_Subj As String

On Error GoTo Email_Err
Set Email_WB = ActiveWorkbook
Persons_Email_Addr = "Emailnamehere.com"
Email_Subj = Range("F5")

Email_WB.SendMail Recipients:=Persons_Email_Addr, _
Subject:=Email_Subj

Email_Err:

End Sub

 

[Kathy Jacobs]

Roger,
I think you meant this post to go to either the Outlook or the Excel
newsgroup. Unfortunately, you got the OneNote newsgroup instead. Try over
there to get more help.

--
Kathy Jacobs, Microsoft MVP OneNote and PowerPoint
Author of Kathy Jacobs on PowerPoint
Get PowerPoint and OneNote information at www.onppt.com
or on my blog, http://geekswithblogs.net/VitaminCH/Default.aspx

I believe life is meant to be lived. But:
if we live without making a difference, it makes no difference that we lived