Solved

Outlook 2010 Macro Coding

Posted on 2014-04-03
3
289 Views
Last Modified: 2014-04-04
I need code that, if I activate the macro while I have an email selected, the macro will forward the email to me and will delay delivery of the email until tomorrow at 2:00pm.

Any help is appreciated. Thank you.
0
Comment
Question by:carlosab
  • 2
3 Comments
 
LVL 76

Accepted Solution

by:
David Lee earned 500 total points
ID: 39977739
Hi, carlosab.

This will do what you described.  It will forward all of the messages you have selected to yourself with delivery set to 2:00pm on the following day.

Sub DelayedForward()
    Dim olkMsg As Outlook.MailItem, olkFwd As Outlook.MailItem
    For Each olkMsg In Application.ActiveExplorer.Selection
        Set olkFwd = olkMsg.Forward
        With olkFwd
            .Recipients.Add Session.CurrentUser.Address
            .Recipients.ResolveAll
            .DeferredDeliveryTime = DateAdd("d", 1, Date) & " 2:00 pm"
            .Send
        End With
    Next
    Set olkMsg = Nothing
    Set olkFwd = Nothing
End Sub

Open in new window

0
 

Author Closing Comment

by:carlosab
ID: 39977811
Perfect. Thanks.
0
 
LVL 76

Expert Comment

by:David Lee
ID: 39977851
You're welcome!
0

Featured Post

Make managing Office 365 email signatures a breeze

Are you using Office 365? Having trouble trying to set up email signatures for your users? Getting stressed out managing multiple signatures? Need an easier way to manage? We have a solution for you, try the most-user friendly and powerful signature management tool on the market.

Join & Write a Comment

Suggested Solutions

Title # Comments Views Activity
DNS and internet 7 63
google aps email 2 56
Re-installing EDGE 6 59
Gmail: redirecting an email address to a folder 3 47
Many recipients get so much mail that they only read e-mail that: Criteria #1: Seems to have a legitimate subject and source, and... Criteria #2: Is convenient (meaning they didn't have to do any extra work to get your message). It's the market…
A high-level exploration of how our ever-increasing access to information has changed the way we do our jobs.
In this Experts Exchange video Micro Tutorial, I'm going to show how small business owners who use Google Apps can save money by setting up what is called a catch-all email address in their Gmail accounts. By using the catch-all feature, small busin…
This video explains how to create simple products associated to Magento configurable product and offers fast way of their generation with Store Manager for Magento tool.

757 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

18 Experts available now in Live!

Get 1:1 Help Now