Help Needed with Simple Macro

[5elpep]

Hi all,

I need a macro which will

-> Reply to all (including the sender)
-> The reply should contain the text "Fax sent"
-> I have a signature set up in Outlook and this should appear in the
message.
-> When sent the window should shut.

At the moment all I have is the following which I have cobbled
together from a previous project
and bits I found on the web.

Sub Macro2()
Set objMsg = Application.ActiveInspector.CurrentItem
Set objMsg = ThisItem.ReplyAll
objMsg.HTMLBody = "Fax sent" & vbCrLf & objMsg.HTMLBody
objMsg.Subject = "New Bond Definition"
objMsg.Send
Application.ActiveInspector.Close param
End Sub

I am using Outlook 2003 with SP2 if this helps.

Thanks in advance for you kind help.

 

[Michael Bauer [MVP - Outlook]]

Set objMsg = ThisItem.ReplyAll

That should be:
Set objMsg =l objMsg.ReplyAll instead

A line break in HTML is "<br>", not vbCRLF.

If your setting is to add a signature automatically then calling
objMsg.getInspector should insert the signature.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Keep your Outlook categories organized!
http://www.shareit.com/product.html?productid=300120654&languageid=1
(German: http://www.VBOffice.net/product.html?pub=6)

Am 13 Feb 2007 12:36:53 -0800 schrieb 5elpep: