1. Here's a thread that needs an answer: BCM Compulsory field, New opportunity
    Dismiss Notice

Delay Send and Mail Merge

Discussion in 'Outlook VBA and Custom Forms' started by kavihasya, Dec 6, 2017.

  1. kavihasya


    New Member
    Looking for a macro that will solve all my problems.

    I support a program that runs numerous events, at the end of which an email needs to be sent inviting the recipient to fill out a survey. I obviously don't want to send these emails out before the event has taken place. I would prefer to schedule the sending of these emails in advance to better manage my workflow

    I create these emails through a mail merge (sending the messages into my offline email outbox). But it seems that the only way to delay sending by more than 120 minutes is to go into each email individually and change it - Not a great solution!

    Is there a macro out there that will allow me to select more than one email, and specify a specific date and time to send those emails? Most of the stuff I've found online has to do with waiting til the next morning - I sometimes want to wait more than a week to send stuff out.
  2. Diane Poremsky

    Diane Poremsky

    Senior Member
  3. kavihasya


    New Member
    Uh, most of it is checking the time of day?

    Is this what you are thinking of?

    Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    SendDate = InputBox("Enter date to send")
    SendAt = SendDate + #7:00:00 PM#
    Item.DeferredDeliveryTime = SendAt
    End Sub​
  4. kavihasya


    New Member
    Oh, but I'm also noticing that this will impact everything that I send! How do I get it to only impact selected messages in my outbox?
    Oh, but I'm also noticing that this will impact everything. I only want this to apply to specific messages I select. Not everything. How do I specify?
  5. Diane Poremsky

    Diane Poremsky

    Senior Member

Share This Page