View Single Post
  #3  
Old January 5th 10, 08:51 PM posted to microsoft.public.outlook.program_vba
pete the greek
external usenet poster
 
Posts: 6
Default how to add ...person wrote...email address..reply

hi heres a starter for you

a macro you could have on a button

Sub replytest()
Set ThisItem = Application.ActiveExplorer.Selection
Set thisreply = ThisItem.Item(1).Reply
Message = InputBox("please type your message")
thisreply.Body = "In a message dated " & Date & Message & " Eastern Daylight
writes:" & thisreply.Body

thisreply.Send
End Sub


my only problem is i cant work out how to make the reply visible so you can
add your message to the mail
you could add an inputbox to the macro to gather your message ( as shown)

but im sure someone out there will put me out of my misery and explain how
to get the reply visible so you could type directly in it


regards

pete


"wonder why?" wrote:

My question about Outlook: How do I have this entered automatically when
sending a reply?

"In a message dated 9/21/09 11:10:12 P.M. Eastern Daylight Time,
writes:"

Is there a website to learn this? Or is there software that will do this
and some other such entries.
The automatic...out of office...we can find.. I have not been able to find
this online.
Thanks.



In a message dated 9/21/09 11:10:12 P.M. Eastern Daylight Time,
writes:

Ads