Creating a Delegate field

J

Jon

When viewing emails, I have my Inbox shared with someone else on another PC.
i.e. we both view and edit the same email Inbox.

What I would like is a facility whereby I can tag a message to be Delegated
for someone else to deal with. So, I figure I need another custom column. In
that column would be an a combo box that lets me pick off one of 3 letters
which will be the first letter of the name of the person to whom I wish to
delegate.

So it runs like this...I have 5 emails in the Inbox. I will deal with email
1, 2 and 4 but I tag email 3 and 5 with the letter D as David will be
dealing with this.

Is it possible to do this with Outlook 2003?
 
R

Roady [MVP]

Since you are using Outlook 2003 why not assigning flag colors to eachother?
You can also tag the subject with some VBA. Just a quick example;

Sub assign()
Dim myOlApp As Outlook.Application
Dim myinspector As Inspector
Set myOlApp = CreateObject("Outlook.Application")
Set myinspector = myOlApp.ActiveInspector
User = Session.CurrentUser
nwsubject = myinspector.CurrentItem.Subject
myinspector.CurrentItem.Subject = UCase(User) & ": " & nwsubject

myinspector.CurrentItem.FlagIcon = olRedFlagIcon
myinspector.Close olSave
End Sub

--
Robert Sparnaaij [MVP-Outlook]
www.howto-outlook.com

Tips of the month:
-Properly back-up and restore your Outlook data
-Creating a Permanent New Mail Desktop Alert in Outlook 2003
 
J

Jon

Flag colors is one solution but I prefer letters as it is clearer.

Does your code auto tag the Subject according to which Inbox it goes in? Or
do you select something? Would prefer not to tag a Subject as filtering will
be done by Subject in some cases.

Roady said:
Since you are using Outlook 2003 why not assigning flag colors to eachother?
You can also tag the subject with some VBA. Just a quick example;

Sub assign()
Dim myOlApp As Outlook.Application
Dim myinspector As Inspector
Set myOlApp = CreateObject("Outlook.Application")
Set myinspector = myOlApp.ActiveInspector
User = Session.CurrentUser
nwsubject = myinspector.CurrentItem.Subject
myinspector.CurrentItem.Subject = UCase(User) & ": " & nwsubject

myinspector.CurrentItem.FlagIcon = olRedFlagIcon
myinspector.Close olSave
End Sub

--
Robert Sparnaaij [MVP-Outlook]
www.howto-outlook.com

Tips of the month:
-Properly back-up and restore your Outlook data
-Creating a Permanent New Mail Desktop Alert in Outlook 2003

-----
Jon said:
When viewing emails, I have my Inbox shared with someone else on another
PC.
i.e. we both view and edit the same email Inbox.

What I would like is a facility whereby I can tag a message to be
Delegated
for someone else to deal with. So, I figure I need another custom column.
In
that column would be an a combo box that lets me pick off one of 3 letters
which will be the first letter of the name of the person to whom I wish to
delegate.

So it runs like this...I have 5 emails in the Inbox. I will deal with
email
1, 2 and 4 but I tag email 3 and 5 with the letter D as David will be
dealing with this.

Is it possible to do this with Outlook 2003?
 
R

Roady [MVP]

The code places the name of the currently logged on user in front of the
subject. You can of course hardcode the tag being used and create a separate
tag (and thus a separate macro as well) for each of your coworkers.

--
Robert Sparnaaij [MVP-Outlook]
www.howto-outlook.com

Tips of the month:
-Properly back-up and restore your Outlook data
-Creating a Permanent New Mail Desktop Alert in Outlook 2003

-----
Jon said:
Flag colors is one solution but I prefer letters as it is clearer.

Does your code auto tag the Subject according to which Inbox it goes in?
Or
do you select something? Would prefer not to tag a Subject as filtering
will
be done by Subject in some cases.

in
message news:[email protected]...
Since you are using Outlook 2003 why not assigning flag colors to eachother?
You can also tag the subject with some VBA. Just a quick example;

Sub assign()
Dim myOlApp As Outlook.Application
Dim myinspector As Inspector
Set myOlApp = CreateObject("Outlook.Application")
Set myinspector = myOlApp.ActiveInspector
User = Session.CurrentUser
nwsubject = myinspector.CurrentItem.Subject
myinspector.CurrentItem.Subject = UCase(User) & ": " & nwsubject

myinspector.CurrentItem.FlagIcon = olRedFlagIcon
myinspector.Close olSave
End Sub

--
Robert Sparnaaij [MVP-Outlook]
www.howto-outlook.com

Tips of the month:
-Properly back-up and restore your Outlook data
-Creating a Permanent New Mail Desktop Alert in Outlook 2003

-----
Jon said:
When viewing emails, I have my Inbox shared with someone else on
another
PC.
i.e. we both view and edit the same email Inbox.

What I would like is a facility whereby I can tag a message to be
Delegated
for someone else to deal with. So, I figure I need another custom column.
In
that column would be an a combo box that lets me pick off one of 3 letters
which will be the first letter of the name of the person to whom I wish to
delegate.

So it runs like this...I have 5 emails in the Inbox. I will deal with
email
1, 2 and 4 but I tag email 3 and 5 with the letter D as David will be
dealing with this.

Is it possible to do this with Outlook 2003?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top