-
Reminder message
Hi,
With this vba code I am sending reminder message to all recipient of a already saved sent message form my sent message box. But only problem is that whenever I am executing this code my original message is getting converted into a plain text message.
Can somebody help me to identify where I am going wrong “so that original message remain as in HTML message format only”
Thanks in advance.
For code goes as follows :
Sub Reminder_All()
Dim rpl As Outlook.MailItem
Dim itm As Object
Set itm = GetCurrentItem()
If Not itm Is Nothing Then
Set rpl = itm.ReplyAll
rpl.Subject = rpl.Subject
CopyAttachments itm, rpl
rpl.BodyFormat = olFormatHTML
rpl.Body = "PLEASE RESPOND URGENTLY " & rpl.Body '& vbCrLf & vbCrLf
rpl.Display
End If
Set rpl = Nothing
Set itm = Nothing
End Sub
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules