categorizing and Filing sent mail items

Status
Not open for further replies.

smurf2

New Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
I have a technical question for an outlook macro that I got partially working.

I want to be able to categorize and file an email upon sending. I have got this far: (See Below) right now when I send a new item a Category Dialog opens where I can select my category. (aka: Follow Up)

1) What I need to add is the function to file this sent email in the appropriate folder for that category. (I have tried to run a rule but it will not work in the sent folder) and ;

2) right now it does not work for forwarding or replying to emails only new emails. I would like it to give me this option every time I send an email.

Any help you could give me or anywhere you could point me to go would be very much appreciated.


'Categorize Sent Items
'Place in ThisOutlookSession
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
If TypeOf Item Is Outlook.MailItem And Len(Item.Categories) = 0 Then
Set Item = Application.ActiveInspector.CurrentItem
Item.ShowCategoriesDialog
End If
End Sub

End Sub
 

smurf2

New Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
okay, update...

i am a little closer (I think) unless i am missing something...


but how do I make it work for all items??

this is what i got....


'Categorize Sent Items
'Place in ThisOutlookSession
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

Dim objNS As NameSpace

Dim objFolder As MAPIFolder

Set objNS = Application.GetNamespace("MAPI")

Set objFolder = objNS.PickFolder

If TypeOf Item Is Outlook.MailItem And Len(Item.Categories) = 0 Then
Set Item = Application.ActiveInspector.CurrentItem
Item.ShowCategoriesDialog

End If

Set objFolder = Nothing

Set objNS = Nothing

End Sub
 
Status
Not open for further replies.
Thread starter Similar threads Forum Replies Date
T Categorizing different colors for a series of events Using Outlook 0
B Color Categorizing 365 Using Outlook 8
D Problem: Categorizing emails categorizes ALL emails with same subject, even deleted Using Outlook 7
D How to handle filing of emails from an Inbox Subfolder to a specific Public folder Using Outlook 1
Diane Poremsky Filing Outlook Email Messages New Slipstick.com Articles 0
S Outlook 7 VBA macro for multiple filing Outlook VBA and Custom Forms 1
G Macro to Force Filing of Outlook Inbox Using Outlook 9
S My Outlook Filing Cabinet has disappeared! Does anyone know how I get it back?? Using Outlook 1
J Email filing Using Outlook 1
Q Filing 'Sent' Messages in Outlook 2003 Using Outlook 12
T Changing Sent Items location in Outlook 2019 Using Outlook 0
S Outlook (2016 32bit; Gmail IMAP) - Save sent message to Outllook Folder Outlook VBA and Custom Forms 0
C VBA to prompt for Sent folder destination Outlook VBA and Custom Forms 3
MrMayor SENT mail not reloading to top?? Using Outlook 4
D Mail in Sent Items Gone Using Outlook 12
A calendar invites sent from Microsoft Outlook to Mac Outlook is not working Calendar Printing Assistant 3
Terry Sullivan E-Mails Sent Using a Group Box Result in 70 Kickbacks Using Outlook 5
GregS Outlook 2016 Sent Mail absent from Sent Mail or Sent Items Folders Using Outlook 4
P Outlook for Mac - emails are not sent out beginning last week Using Outlook 1
J Sent Items Folder NOT Showing Correct From Email Address Using Outlook 0
J Outlook Reply > From > Other Email Address... > Address Not Showing in Sent Items... From Email Outlook VBA and Custom Forms 0
T Column to display which email alias a message was sent to Outlook VBA and Custom Forms 6
GregS Outlook 2016 Sent Items vs Sent Messages Using Outlook 2
N Disable Auto Read Receipts sent after using Advanced Find Using Outlook 4
R Outlook for Mac - Advanced Search and Tracking Sent Emails Using Outlook 0
B Outlook - Mail from safe senders list being sent to Spam Folder Using Outlook 0
N Sent emails not reflected in all IMAP Folders Using Outlook 4
L Outlook/O365 "sent on behalf" behaviour Exchange Server Administration 1
M Sent mail not showing in Sent Items folder; but they can be found with Search Using Outlook 3
H Outlook 2016 sent over 30 copies of an e-mail with attachments Using Outlook 1
W Outlook 2010 some sent items marked unread now (was Ok before) Using Outlook 0
T Outlook converts sent email to txt attachments when sync Using Outlook 0
R VBA for copying sent email to current folder under a shared mailbox Outlook VBA and Custom Forms 17
D Sort Problem with Sent Folders Using Outlook 1
oliv- determine to which address an email has been sent Outlook VBA and Custom Forms 3
GregS Many Sent Item folders Using Outlook 3
B One email cannot be sent or received (but leaves outbox!) Using Outlook 1
V Emails remain in Drafts folder even though they have been sent Using Outlook 4
O Rule to move (specific) messages from Sent folder to Specific folder Using Outlook 1
V Emails going into Drafts instead of Sent folder Using Outlook 3
V Items missing in Sent folder Using Outlook 10
M Print email and, attachments sent in hyperlinks in the email Outlook VBA and Custom Forms 2
M Sent mail not showing in my sent folder Using Outlook 9
A Replies being sent from wrong account Using Outlook 8
W Deleting Sent Task Email, Deletes the task from my list Using Outlook 1
icacream Rule based on sender / wrong sender sent to folder Using Outlook 7
icacream outlook keeps neither SENT or FORWARDED messages... they vanish ! Using Outlook 4
B Looking to filter (or just find/search) for only messages that the sender has sent more than 1 messa Using Outlook 2
I How to receive mails on behalf of when sent to group mail? Using Outlook 2
C Change default "Save Sent Item To" folder Outlook VBA and Custom Forms 9
Similar threads


















































Top