excel output to outlook?

J

josh ashcraft

I'm trying to email just the values of a range from my
worksheet. I don't want the cells to show up, only the
text. using the partial code i have below, what would be
the proper way to handle this?

Dim OLF As Outlook.MAPIFolder, olMailItem As
Outlook.MailItem
Dim ToContact As Outlook.Recipient
Set OLF = GetObject("", _
"Outlook.Application").GetNamespace
("MAPI").GetDefaultFolder(olFolderInbox)
Set olMailItem = OLF.Items.Add ' creates a new e-mail
message
With olMailItem
..Subject = "Banklist Status sheet for " & Date ' message
subject
Set ToContact = .Recipients.Add
("(e-mail address removed)") ' add a recipient

.Body = "Thank you for submitting, here are your
results." &(chr13) & right here is where i want the values
to be inserted...

Thanks in advance guys,
Josh
 
B

Bob Phillips

Josh,

You can just tag a range value on the end like so

.Body = "Thank you for submitting, here are your results." & Chr(13)
& Range("C11").Value
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top