Categorize Outgoing Mail

Status
Not open for further replies.

akonn

New Member
Outlook version
Outlook 2016 64 bit
Email Account
Office 365 Exchange
Hi,

Using the macro in "ThisOutlookSession" to have my assign category box automatically open when sending new mail. But......It won't work when replying to mail. Any experts have a solution. Outlook 2016.


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
 
you don't need the following line - ByVal Item As Object, Cancel As Boolean sets the item.
Set Item = Application.ActiveInspector.CurrentItem

i removed the set item line and it worked for both new and replies... but if it still fails, instead of Len(Item.Categories) = 0 , try item.categories =""

also, note that when you set the category before sending, the category may visible to the recipient (if they use outlook) and in the message header: Keywords: Blue category.

if you definitely don't want to share the categories with the recipients, you can either use an itemadd macro that watches the sent folder and brings up the dialog after its sent or see if Sending Categories on Email Messages works for you.
 
Last edited:
Thanks. Appears to be working now.
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
P Categorize in Calendar not listed under tags in Office 365 (Office 2016) Using Outlook 5
P Automatically Categorize Meetings once they are accepted Outlook VBA and Custom Forms 5
K Maximum Categorize Shortcuts In Outlook 2010? Using Outlook 1
King Mustard Maximum Categorize shortcuts in Outlook 2010? Using Outlook 1
C Auto categorize duplicate subjects Outlook VBA and Custom Forms 11
R Categorize Button in Quick Access Toolbar Disappears on New Email Using Outlook 1
acpete48317 Categorize and move Outlook Email Outlook VBA and Custom Forms 2
Diane Poremsky Categorize Messages using Contact Category Using Outlook 0
J categorize problem outlook 2010 Using Outlook 3
L Categorize new email Using Outlook 1
D Delete selected text in outgoing email body Outlook VBA and Custom Forms 0
D Wrong email address in Outlook 2003 "From" tab in new outgoing emails Using Outlook 4
D Assign categories to outgoing emails Outlook VBA and Custom Forms 0
oliv- How to distinguish whether mail is incoming or outgoing? Outlook VBA and Custom Forms 2
I categories for outgoing email Outlook VBA and Custom Forms 7
L How to use different fonts for outgoing messages for different email accounts Using Outlook 0
A Flag outgoing email messages in Outlook 2010 Outlook VBA and Custom Forms 0
F Outgoing mail from Outlook.com sticks in Drafts folder Using Outlook 0
C Auto Add a PDF to an outgoing Email, based on a rule Using Outlook 2
M To set the storage folder for an outgoing Outlook message Outlook VBA and Custom Forms 8
Diane Poremsky Common Outlook Outgoing Server (SMTP) Errors Using Outlook 0
iwshim Can I add an Unsubscribe link to Outlook outgoing email? Something like this? Using Outlook 1
A Stop Rule (not turn off) that Delays Outgoing Items Outlook VBA and Custom Forms 1
M How best to track OUTGOING referrals? BCM (Business Contact Manager) 2
jw12341243 Outgoing email on deleted account Using Outlook 7
T Outgoing Messages in the Reading Pane Cannot Be Flagged in Outlook 2013 Using Outlook 6
L recipients are not recieving my outgoing emails Using Outlook 1
T Mystery outgoing messages. Using Outlook 0
L How to inbed picture in new outgoing messae Using Outlook 2
G Changing my outgoing mail display name 2010 Using Outlook 1
J Saving Incoming & Outgoing Outlook 2010 Email Locally with IMAP Using Outlook 2
B Add Watermarks to Outlook email outgoing messages Using Outlook 0
R Long delay for outgoing mail Using Outlook 2
L Outgoing Email attachment error "the system cannot find the file specified" Using Outlook 3
C No date outgoing mail Using Outlook 0
M Outlook 2007 - Save outgoing attachments to network drive on sending? Using Outlook 1
M Outlook yahoo POP3 outgoing messages are not reaching destination. Sometime the messages reach the Using Outlook 10
S Incoming and Outgoing SMTP server settings Using Outlook 7
G Date Stamp in SUBJECT BOX of Outgoing/Incoming Mail Outlook VBA and Custom Forms 11
N A code that adds category to an outgoing mail message in outlook Outlook VBA and Custom Forms 7
L Error when exporting Sent Mail to Excel Outlook VBA and Custom Forms 6
X Run macro automatically when a mail appears in the sent folder Using Outlook 5
K How can I delete an e-mail from Outlook Using Outlook 1
L Help: set flag for sent mail to check if received an answer Outlook VBA and Custom Forms 2
A Macro Mail Alert Using Outlook 4
e_a_g_l_e_p_i MY Outlook 2021 changed the format of the shortcuts for mail, calendar etc. Using Outlook 10
Z Outlook 365 Automatically assign categories to incoming mail in a shared folder Round Robin Outlook VBA and Custom Forms 1
W Outlook 365 I am getting the "Either there is no default mail client" error when I try to send an email on excel Office 365 Using Outlook 1
D Gmail mail is being delivered to a different email inbox in Outlook App 2021 Using Outlook 2
P What is your strategy for dealing with SPAM and Junk Mail? Using Outlook 1

Similar threads

Back
Top