View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Josh Ashcraft Josh Ashcraft is offline
external usenet poster
 
Posts: 7
Default excel output to outlook?

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
") ' 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