HI Expert,
I am almost blocked in my project for now. Issue I am facing is when I am posting a reply through outlook VBA, all is OK except images in the mail, it just shows missing image.
Below is my code. Without image being included in reply, I can not proceed
Please advice me on this, how to proceed
Sub send_reply(ByVal Item As Outlook.MailItem)
Dim olReply As MailItem
Item.Actions("Reply").ReplyStyle = olIncludeOriginalText
If Item.Class = olMail Then
Set olReply = Item.Reply
Else
Exit Sub
End If
olReply.BodyFormat = olFormatHTML
olReply.subject = Item.subject
olReply.To = Item.Sender
With olReply
.HTMLBody = "This is a test auto reply." & vbCrLf & Item.HTMLBody
.Send
End With
End Sub