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.