justicefriends
Member
- Outlook version
- Outlook 365 64 bit
- Email Account
- Exchange Server
Hi,
i have embedded this macro :
Public Sub SetCustomFlag()
Dim objMsg As Object
Set objMsg = GetCurrentItem()
With objMsg
' due this week flag
.MarkAsTask olMarkThisWeek
' sets a specific due date
.TaskDueDate = Now + 3
.FlagRequest = "Call " & objMsg.SenderName
.ReminderSet = True
.ReminderTime = Now + 2
.Save
End With
Set objMsg = Nothing
End Sub
from : How to set a flag to follow up using VBA
with some tweaks and seems to be working fine on outlook 2016 / o365 with exchange - thanks
the one thing I would love to have is to have this flag/reminder request sent, instead of all recipients to people in the TO field only.
(people in cc and bcc should not get the flag/reminder)
Is there a way to handle that?
appreciate any inputs
jf
i have embedded this macro :
Public Sub SetCustomFlag()
Dim objMsg As Object
Set objMsg = GetCurrentItem()
With objMsg
' due this week flag
.MarkAsTask olMarkThisWeek
' sets a specific due date
.TaskDueDate = Now + 3
.FlagRequest = "Call " & objMsg.SenderName
.ReminderSet = True
.ReminderTime = Now + 2
.Save
End With
Set objMsg = Nothing
End Sub
from : How to set a flag to follow up using VBA
with some tweaks and seems to be working fine on outlook 2016 / o365 with exchange - thanks
the one thing I would love to have is to have this flag/reminder request sent, instead of all recipients to people in the TO field only.
(people in cc and bcc should not get the flag/reminder)
Is there a way to handle that?
appreciate any inputs
jf