how do you email a portion of a worksheet (range) as an insert into the body of an email?

  • Thread starter Thread starter Bruce
  • Start date Start date
B

Bruce

I want to create a macro or a procedure that will take a portion of a
worksheet and then send it to an email address.
This is to basically sending an invoice. I want to include this in the BODY
and NOT as an attachment.

Thanks
Bruce
 
Do you know how to set it up so taht it uses a specific account?
I have tried modifying to be like:
With OutMail
.To = emailname
.CC = ""
.BCC = bbcname 'bbc is set to a valid email address
.SendUsingAccount = bbcname
.Subject = "Invoice for - " & Range("L6").Value & " - " &
Application.Text(Range("L4").Value, "mmm-dd-yyyy")
.HTMLBody = RangetoHTML(rng)
.Send 'or use .Display

End With

Thanks
 
Back
Top