Automatic Weekly Email

[DragonWood]

Good Afternoon,

Every Friday morning at 8:00 I send an email to our service team asking them for their ETA to the customer locations for the following week.

I would like to either set this up as a simple recurring item (kind of like a recurring task or calendar event). Or set up a VBA code that will automatically send the email every Friday. Either way works for me. I just can’t find anything on how to do either one.

Can someone please point me in the right direction?

Thanks in advance for any help.

[Logit]

support.microsoft.com/en-us/kb/239087



Search the internet for : outlook auto send recurring email

[skatonni]

A combination of a recurring task "ETA mail" or appointment with a reminder to trigger some VBA in ThisOutlookSession.

Option Explicit

Private Sub Application_Reminder(ByVal Item As Object)

Dim objMsg As mailItem
 
If Item.Class = oltask Then

    If InStr(Item.Subject, "ETA mail") > 0 Then
       
        Set objMsg = CreateItem(olMailItem)
    
        objMsg.To = "someone @ somewhere.com"
        objMsg.Subject = "Send ETA"
        objMsg.body = "It is friday."
        
        objMsg.Display
        ' or when tested
        ' objMsg.Send
        
    End If

End If

Set objMsg = Nothing

End Sub

If you do not want to see the reminder, investigate BeforeReminderShow to dismiss it.