A Microsoft Outlook email forum. Outlook Banter

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » Outlook Banter forum » Microsoft Outlook Email Newsgroups » Outlook and VBA
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

Reply with picture in body of message



 
 
Thread Tools Search this Thread Display Modes
  #1  
Old May 30th 09, 10:28 PM posted to microsoft.public.outlook.program_vba
Maxx[_2_]
external usenet poster
 
Posts: 9
Default Reply with picture in body of message

I'd like to mofify this code (if possible) so that it includes the picture
that is in the body of the e-mail.

Sub ReplyDelightful()
Set objInsp = Application.ActiveInspector
If Not objInsp Is Nothing Then
Set objItem = objInsp.CurrentItem
If objItem.Class = olMail Then
Set objReply = objItem.Reply
With objReply
.Body = "Delightful!" & vbCrLf & vbCrLf & "Thanks," & vbCrLf
& "David" & vbCrLf & .Body
.Display
End With
End If
End If

End Sub


  #2  
Old June 1st 09, 07:36 PM posted to microsoft.public.outlook.program_vba
Ken Slovak - [MVP - Outlook]
external usenet poster
 
Posts: 5,848
Default Reply with picture in body of message

If this is an HTML message try using HTMLBody. Body will only return the
plain text rendering of the message.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007.
Reminder Manager, Extended Reminders, Attachment Options.
http://www.slovaktech.com/products.htm


"Maxx" wrote in message
...
I'd like to mofify this code (if possible) so that it includes the picture
that is in the body of the e-mail.

Sub ReplyDelightful()
Set objInsp = Application.ActiveInspector
If Not objInsp Is Nothing Then
Set objItem = objInsp.CurrentItem
If objItem.Class = olMail Then
Set objReply = objItem.Reply
With objReply
.Body = "Delightful!" & vbCrLf & vbCrLf & "Thanks," &
vbCrLf & "David" & vbCrLf & .Body
.Display
End With
End If
End If

End Sub


  #3  
Old June 2nd 09, 06:06 PM posted to microsoft.public.outlook.program_vba
Maxx[_2_]
external usenet poster
 
Posts: 9
Default Reply with picture in body of message

Ken,
THank you very much for your help.
David

"Ken Slovak - [MVP - Outlook]" wrote in message
...
If this is an HTML message try using HTMLBody. Body will only return the
plain text rendering of the message.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007.
Reminder Manager, Extended Reminders, Attachment Options.
http://www.slovaktech.com/products.htm


"Maxx" wrote in message
...
I'd like to mofify this code (if possible) so that it includes the
picture that is in the body of the e-mail.

Sub ReplyDelightful()
Set objInsp = Application.ActiveInspector
If Not objInsp Is Nothing Then
Set objItem = objInsp.CurrentItem
If objItem.Class = olMail Then
Set objReply = objItem.Reply
With objReply
.Body = "Delightful!" & vbCrLf & vbCrLf & "Thanks," &
vbCrLf & "David" & vbCrLf & .Body
.Display
End With
End If
End If

End Sub




 




Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Reply with custom form & selected data from message body GregoryL.[AITI] Outlook and VBA 3 May 28th 09 03:46 PM
Message headers, attachments, and the message body may be lost in Outlook 2003 when you reply to an e-mail message that contains a References header that exceeds 1,000 bytes gbkhor[_2_] Outlook - General Queries 0 March 4th 09 10:26 AM
Reply in Outlook cursor on TO line instead of body of message [email protected] Outlook - General Queries 0 June 27th 06 09:21 PM
Can't see message body until Reply or Fwd is selected Jen Outlook - General Queries 0 March 16th 06 02:31 PM
Inserting a picture in the message body of a custom form groom Outlook - General Queries 1 February 8th 06 10:08 PM


All times are GMT +1. The time now is 02:51 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2025 Outlook Banter.
The comments are property of their posters.