Try this
Sub sample_macro()
'tools -refrences - Outlook
Dim olApp As Outlook.Application
Dim olMail As MailItem
Dim imgnm As String
'Chnage path of image here
imgnm = "C:\Documents and Settings\user\Desktop\a.jpg"
Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem(olMailItem)
Wit
Dear Satheeshkumar,
Find the below image, it might be it will help to write a code, here i dont
have excess to outlook.
press the circle option it will show you clipboard then you can paste it
into outlook.
Thanks & Regards,
Prajakt Pande
+971551388482
**
On Thu, Jan 3, 2013 at 9:06 AM, Sathe