I got this code Rons' Excel page . . . which was very helpful (thanks
Ron); but I would like to send a range from a sheet as a picture in the
body

Sample
Range("A1:AA55").Select
Selection.CopyPicture Appearance:=xlPrinter, Format:=xlPicture
' I would nee to paste this range into the body of the message

Is this possible? ( the idea is not to send out as an excel file, excel
is used to create the data and send it off as a picture show user dont
tamper with it)
-----------------------------------------------------------------
Dim OutApp As Outlook.Application
Dim OutMail As Outlook.MailItem
'Dim Fname As String
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(olMailItem)


With OutMail
..To = "
..CC = ""
..BCC = ""
..Subject = "Subject goes here"
..Body = "Your Message goes here"
..Send 'or use .Display
End With

Set OutMail = Nothing
Set OutApp = Nothing
End Sub


Thank you in advance,


--
Fable


------------------------------------------------------------------------
Fable's Profile: http://www.excelforum.com/member.php...fo&userid=2185
View this thread: http://www.excelforum.com/showthread...hreadid=376550