Solved

need to automate the subject line with the date sent

Posted on 2014-03-31
8
399 Views
Last Modified: 2014-04-16
HI

Is it possible to set up a routine so that the date is put at the beginning of the subject line on every email before it’s sent or reaches the recipient.

we use outlook 2007 to 2013 via exchange 2007.
0
Comment
Question by:total123
  • 4
  • 3
8 Comments
 
LVL 48

Accepted Solution

by:
Rgonzo1971 earned 100 total points
ID: 39966214
Hi,

pls try

This code in the ThisOutlookSession Module after inserting it close Outlook and reopen it
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Item.Subject = Format(Date, "dd.mm.yyyy") & ": " & Item.Subject
End Sub

Open in new window

Regards
0
 
LVL 76

Expert Comment

by:David Lee
ID: 39967137
@Rgonzo1971 - I recommend adding an

Item.Save

to your code.
0
 

Author Comment

by:total123
ID: 39972310
can I ask what an item save would do ?

this did work on testing, thank you
0
 
LVL 76

Expert Comment

by:David Lee
ID: 39972323
Item.Save saves the change to the subject line.
0
IT, Stop Being Called Into Every Meeting

Highfive is so simple that setting up every meeting room takes just minutes and every employee will be able to start or join a call from any room with ease. Never be called into a meeting just to get it started again. This is how video conferencing should work!

 

Author Comment

by:total123
ID: 39972330
ok and how would that look on the macro ?
0
 
LVL 76

Assisted Solution

by:David Lee
David Lee earned 55 total points
ID: 39973420
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Item.Subject = Format(Date, "dd.mm.yyyy") & ": " & Item.Subject
    Item.Save
End Sub

Open in new window

0
 

Author Closing Comment

by:total123
ID: 40004953
spot on, thank you
0
 
LVL 76

Expert Comment

by:David Lee
ID: 40004996
You're welcome!
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

Outlook Free & Paid Tools
If you don't know how to downgrade, my instructions below should be helpful.
In this video we show how to create a User Mailbox in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.: First we need to log into the Exchange Admin Center. Navigate to the Recipients >> Mailb…
In this video we show how to create a Distribution Group in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.: First we need to log into the Exchange Admin Center. Navigate to the Recipients >>…

706 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

18 Experts available now in Live!

Get 1:1 Help Now