Update subject based on text in body

Status
Not open for further replies.

kasper

New Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
I would love to be able to automate a time consuming, tedious process that a couple of us are faced with in the office.
We receive around 130 emails 6x a year with no way to easily identify the school the email is about. There is a string within the body that looks like this - S987654.X# (the X being either a C or U and the # could be anything between 1-5). If anyone could be so kind to help me get something together that would check the incoming email body for the string and compare it to an array I would put together of all our schools and append the subject line with the school name (to come before the existing subject line). The emails would always come from 1 of 2 email addresses so it would only have to look at those addresses specifically.
Although I love tinkering with excel formulas and know some php coding, I am at a complete loss when it comes to VBA, but am excited to see something automated instead of doing the same job manually.
 

kasper

New Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
If anyone can point me in the right direction to put something together to automate this tedious process I'd really appreciate it.
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
sorry about that - i meant to put something together (because its an interesting idea) and am swamped. I have this macro - Outlook AutoReplies: One Script, Many Responses - which shows how to set up the array, but rather than send a reply, you would add the subject to the incoming messages and save it.

You can use this function to search the body for the code: Use RegEx to extract text from an Outlook email message


strText = Item.Body
strCode = ExtractText(strText)
For i = LBound(arrQuestion) To UBound(arrQuestion)
' look for the code here - using regex might be the best method
If InStr(strCode, arrQuestion(i)) Then
item.subject = arrAnswer(i) & item.subject
item.save
' since you'll only have one match, you can quit when its found
exit sub
Next i

remove the if/end in the Do something section to the end sub
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
actually, this If InStr(strCode, arrQuestion(i)) Then should be
If strCode = arrQuestion(i) Then
 
Status
Not open for further replies.
Thread starter Similar threads Forum Replies Date
B Update Item.Subject property Using Outlook 1
J Outlook 2010 - missing "Updated: ... " in subject text after calendar update Using Outlook 2
A trap outbound mail to update subject Outlook VBA and Custom Forms 6
D.Moore VBA script fail after Office 365 update Using Outlook 8
W April 2020 Office 365 Update - Add-Ons fail after Office 365 Update Using Outlook 6
M Outlook 2010 Problem with OutLook 2010 32 bit, after Windows Auto Update Using Outlook 3
Jennifer Murphy Grant R/W (update) access to a friend Using Outlook 3
L Favorites don't update Using Outlook 1
F Copy and replace not update contact in another pst Using Outlook 0
M Message list font changed after update Using Outlook 2
M Quicken One Step Update Bill Reminders Not Syncing to Outlook Using Outlook 1
O Windows 1803 update : QAT and toolbar changed, language pack gone... Using Outlook 5
J Updating existing entry on shared calendar wants to send update from delegate Using Outlook 0
N Using email notification to update calendar events? Outlook VBA and Custom Forms 4
K Update Appointment category when changed in Excel Using Outlook 3
V Outlook 2003 problem with Windows 10 Creators Update 1709 Using Outlook 0
G Windows Update Causes BCM Database Access Problem? BCM (Business Contact Manager) 4
A Creating Progress Bar or Status Bar Update Outlook VBA and Custom Forms 0
M Recent Update Did not Fix Search Problems Using Outlook 7
R Custom Contact Form how to update when loaded. Outlook VBA and Custom Forms 6
C Update Notes for Meeting Attendees Using Outlook 8
A Attendee Update Outlook Meeting Invite Using Outlook 0
Diane Poremsky Outlook Email Security Update New Slipstick.com Articles 0
S Task Update coming as email and not updating task Using Outlook 3
Diane Poremsky Remove Office 2013 Update Banner New Slipstick.com Articles 0
B IMAP folders don't update when Outlook 365 opens Using Outlook 0
J Outlook Macro to Update Sharepoint Excel File Using Outlook 1
Diane Poremsky Task Request Status Update Address Missing New Slipstick.com Articles 0
Christopher M Importing from Eudora Update Using Outlook 5
Cameron Piper Automatically update custom forms across multiple computers Outlook VBA and Custom Forms 1
M Update field codes when opening Outlook Template Outlook VBA and Custom Forms 2
Bachelle Macro to Update Existing Task from New Email Outlook VBA and Custom Forms 3
I Microsoft Security Update KB3097877 Using Outlook 14
S Outlook 2010: October 2015 Update New Slipstick.com Articles 0
S Outlook 2013: October 2015 Update New Slipstick.com Articles 0
Diane Poremsky Update Contacts with a New Company Name and Email Address New Slipstick.com Articles 0
Diane Poremsky Update Contacts with a New Company Name and Email Address New Slipstick.com Articles 0
F Update the notes field Exchange Server Administration 0
A BCM crashes after Windows 10 update BCM (Business Contact Manager) 1
H SQL update column BCM (Business Contact Manager) 0
Forum Admin BCM Update for Outlook 2010/2013 - Nov 2014 BCM (Business Contact Manager) 14
P Outlook 2007 update headers Using Outlook 2
M could not update calendar Using Outlook 1
B Looking for Outlook 2013 update for Send Drafts Macro Using Outlook 4
R Can BCM monitor and select specific emails and use content info to update the client's record? BCM (Business Contact Manager) 1
2 Task auto update to shared group? Using Outlook 1
Alex Hall When updating shared calendar, it does not automatically update personal calendar Using Outlook 3
Stefanos Update Sharepoint tasks through Outlook Using Outlook 2
S New Quick Step based on Team email QS - automatically update too Using Outlook 1
H Outlook.com calendar does not update from Outlook 2013 Home Premium Using Outlook 1
Similar threads


















































Top