Sub Reply()
Dim msg As Outlook.MailItem
Set msg = Application.ActiveExplorer.Selection(1).Reply
msg.SentOnBehalfOfName = "This email address is being protected from spambots. You need JavaScript enabled to view it."
msg.Display
End Sub


MS Outlook 2010

PayPal Donate Button

No comments

Leave your comment

In reply to Some User
Captcha Image