Hi All
Grade 1 rookie at VBA
In OL 2010 Quicksteps performs a mulitask for me with email that is brilliant. With one click I can: Flag the email, categorize it, and move to another folder (out of my inbox)
In Outlook 2007 however, this cannot be done 'out of the box'.
So, I have tried to emulate the 2010 functionality via a macro in OL2007. I have searched endlessly and can only muster the following:
Public Sub SetCustomFlag()
Dim objMsg As Object
Dim Item As MailItem
'opens the category dialog
Set Item = Outlook.Application.ActiveExplorer.Selection.Item(1)
Item.ShowCategoriesDialog
'Runs function in Module 1 to fetch selected item
Set objMsg = GetCurrentItem()
With objMsg
' sets follow up flag start date
.MarkAsTask olMarkTomorrow
.Save
End With
Set objMsg = Nothing
End Sub
This macro will flag (Tomorrow) and open up the category dialogue box for me to categorize ad hoc.
I am looking for code that completes my macro; code that will then move my categorised email to the appropriate subfolder.
Help with this would be much appreciated
Regards
Bookmarks