AUPIT
asked on
Sending the same reply to multiple messages
I have a user that is a member of a recruitment group, and they are wanting to send a standard reply to multiple emails that they have received, is there any way of doing this in outlook. as when you select multiple messages the reply option is greyed out.
Thanks
Ally
Thanks
Ally
ASKER
Scripting is an option that i had thought about but didnt know where to begin.
How do they want this to work? Do they have a template that they want to reply with, or do they want to select the messages, and be prompted for the text to send?
ASKER
They have a template saved that they will use
Here's the code for doing this. Follow these instructions to use it.
1. Start Outlook
2. Click Tools->Macro->Visual Basic Editor
3. Paste the script into the right-hand pane of the VB Editor
4. If not already expanded, expand Modules and double-click on Module1
5. Edit the code as needed. I included a comment line immediately before any line that needs editing.
6. Click the diskette icon on the toolbar to save the changes
7. Close the VB Editor
8. Stop here if you're using Outlook 2007
9. Click Tools->Macro->Security
10. Set Security Level to Medium
To use this
1. Select one or more messages
2. Run the macro
For each selected message the macro creates a reply using the specified template.
1. Start Outlook
2. Click Tools->Macro->Visual Basic Editor
3. Paste the script into the right-hand pane of the VB Editor
4. If not already expanded, expand Modules and double-click on Module1
5. Edit the code as needed. I included a comment line immediately before any line that needs editing.
6. Click the diskette icon on the toolbar to save the changes
7. Close the VB Editor
8. Stop here if you're using Outlook 2007
9. Click Tools->Macro->Security
10. Set Security Level to Medium
To use this
1. Select one or more messages
2. Run the macro
For each selected message the macro creates a reply using the specified template.
Sub SendReply2All()
Dim olkMsg As Outlook.MailItem, _
olkReply As Outlook.MailItem, _
olkTemp As Outlook.MailItem
For Each olkMsg In Application.ActiveExplorer.Selection
Set olkTemp = olkMsg.Reply
'Change the path and filename of the template on the next line
Set olkReply = Application.CreateItemFromTemplate("C:\SomeFolder\Template.oft")
olkReply.Recipients.Add olkTemp.Recipients.Item(1).Address
olkReply.Display
Set olkTemp = Nothing
Next
Set olkReply = Nothing
Set olkMsg = Nothing
End Sub
ASKER
is there a script if they dont have a template
ASKER
I have followed your well laid out instructions but when I try and run the macro I get the following error, "The macros in this project are disabled. Please refer to the online help or documentation of the host application to determine how to enable macros" I have changed the security for macro's to low but I still get the error, any help would be gratefully received
Did you close and restart Outlook after changing the security setting? If you did, then try adding the following code to the ThisOutlookSession module:
Private Sub Application_Startup()
MsgBox "Hello world."
End Sub
Close and relaunch Outlook. When it starts it should display a dialog-box asking if you want to enable macros. You must answer yes.
Private Sub Application_Startup()
MsgBox "Hello world."
End Sub
Close and relaunch Outlook. When it starts it should display a dialog-box asking if you want to enable macros. You must answer yes.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Is there a version of this that will keep the original subject line of the email and simply put RE: in front of the original subject?
Also, when I tried this, I was getting the error about needing an email in the To: or CC: box. Am I overlooking something?
Also, when I tried this, I was getting the error about needing an email in the To: or CC: box. Am I overlooking something?
I can do this with a bit of scripting. Is that an option? If so, then I can post the script and instructions for using it.