How do i reply to many emails at once in Office 2007?

Posted on 2009-04-23
Last Modified: 2012-05-06
I've been trying to look for a script for Office 2007 that will allow me to reply by highlighting all my emails within a folder (it may be 20 or 500), right click to something like 'Reply to all in BCC' and then type my message.

The reason why I need to reply in BCC is because the person in HR receives a lot of emails from applicants, which of course he doesnt want other people seeing other peoples emails. And instead of opening up 100 emails and copying and pasting the message, he wants to be able to do it with one message so it doesnt tie up his PC.

Can this be done?
Question by:moondy
    LVL 39

    Expert Comment

    I don't know, but perhaps you can create a custom form with the message embedded.
    LVL 10

    Expert Comment

    How about using an outlook rule that automatically replies to each applicant email with pre specified text?


    Author Comment

    Thats ok but he wants to be able to send the message at his disposoal
    LVL 10

    Expert Comment

    You can set the rule to not run automatically.
    Instead you push the button to start the process manually, but you only have to push the button once, to process all the relevant emails.

    Author Comment

    How do i create a rule replying to a email previously received?
    Essentially, we need to be able to manually run the rule on a folder full of emails with the same message (the "reply using a specific message'). Does it pick up the email address automatically and insert it and then send it?
    Because thats what we need.
    LVL 10

    Expert Comment

    If you run the rule manually it will process any emails already recieved, you can evn specify folders.

    Try this walk through
    LVL 10

    Expert Comment

    I may have steered you in the wrong direction as I just worked out that automatic replies are disabled n the Exchange server configuration by default.
    have a look :

    "Allow Automatic Forwarding/Replying to the Internet
    As a secure default Exchange doesnt allow sending automatic forwards, replies and Out of Office Assistant Messages to the Internet. The security in this is that there cant be created any mail loops and that Exchange doesnt reply to any spam messages which might lead to spam attacks. If you still want to disable this behaviour after careful consideration you can do this in the following way;

    Exchange 2000/2003:
    1.Open Exchange System Manager
    2.Expand your site-> Global Settings-> Internet Message Format
    3.In the right pane right click Default and choose Properties-> tab Advanced
    4.Here you can enable or disable the automatic replying/forwarding"
    LVL 59

    Expert Comment

    by:Chris Bottomley
    It should be feasible to run a macro on the selected emails, will that be acceptable?

    LVL 2

    Accepted Solution

    Afternoon Moody
    I am assuming you want to drag the email, drop it into a folder and have that email respond automatically with a pre-define tempate.
    If that's the case follow these steps.
    1. Make sure the user has local administrator rights on the pc and that he doesn't have roaming profile.
    2. In the Trust Centre under Programmatic Access, select "Never warn me about suspicious activity (not recommend)"
    3. Macro settings need to be set to low
    4. Open your Microsoft Visual Basic (click Alt+F11)
    5. click onto "ThisOutlookSession" located under Project1-->Microsoft Office Outlook
    6. Paste the below code.
    *************************************** Reply All Code ************

    'Option Explicit
    Dim WithEvents TargetFolderItems As Items
    Private Sub Application_Startup()
    'some startup code to set our "event-sensitive"
    'items collection
    Dim ns As Outlook.NameSpace
    'use MAPI
    Set ns = Application.GetNamespace("MAPI")
    'Define location of folder that email will drop into for sending replys
    Set TargetFolderItems = ns.Folders.Item( _
    "Mailbox - Chris Chant").Folders.Item("Rejected").Items
    End Sub
    Sub TargetFolderItems_ItemAdd(ByVal Item As Object)
    Dim myReply As MailItem
    Dim FileName As String
    Dim addrName As String
    Dim Sender1 As String
    Set olApp = New Outlook.Application
    'Sender's email address
    addrName = Item.SenderEmailAddress
    'Template message used for reply, define the exact location
    FileName = "C:\Documents and Settings\chris_chant\My Documents\AutoReply.msg"
    'import the template
    Set myReply = olApp.CreateItemFromTemplate(FileName)
    'Add sender's email address
    myReply.Recipients.Add (addrName)
    'send template
    End Sub
    Private Sub Application_Quit()
    Dim ns As Outlook.NameSpace
    Set TargetFolderItems = Nothing
    Set ns = Nothing
    End Sub
    If this doesn't have help you, let me know.

    Author Closing Comment

    Thank you very much Chris, i was waiting ages for this and you seem to be the only one that tried. I just did a quick test now and it worked perfectly. I just sent off 234 emails with this all at once...

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    How your wiki can always stay up-to-date

    Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
    - Increase transparency
    - Onboard new hires faster
    - Access from mobile/offline

    Learn more about the importance of email disclaimers with our top 10 email disclaimer DOs and DON’Ts.
    Check out this infographic on what you need to make a good email signature that will work perfectly for your organization.
    Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
    This Experts Exchange video Micro Tutorial shows how to tell Microsoft Office that a word is NOT spelled correctly. Microsoft Office has a built-in, main dictionary that is shared by Office apps, including Excel, Outlook, PowerPoint, and Word. When …

    737 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    17 Experts available now in Live!

    Get 1:1 Help Now