Quick question if i may

Status
Not open for further replies.

adaminaus

New Member
Outlook version
Outlook 2010 64 bit
Email Account
IMAP
Hi guys, this may be easy i hope.
I am send email to a group of mobile phones as our paging service will txt for us but this cost is massive where as the pager is cloned (yes i know pager old school)

I am trying to find a script to do the following
Email arrives i forward the email taking the body and replacing the subject

Example

Email arrives

subject -
Copy of page message (to 92523)

Body
81 IS OUT OF AREA FOR REMAINDER OF AFTERNOON. SIGNED ADAM.

This will auto forward as a rule (working great) but i need the body to become the subject so it will send out this the body can just stay blank. or have the old information that's fine.

subject -
81 IS OUT OF AREA FOR REMAINDER OF AFTERNOON. SIGNED ADAM.

Body
 
You can do that using VBA - start here http://www.slipstick.com/outlook/rules/run-script-rule-change-subject-message/

Is that text the only thing in the body? if so, it should be fairly straightforward -

Code:
Sub ChangeSubjectForward(Item As Outlook.MailItem)
Set myForward = Item.Forward
myForward.Recipients.Add "alias@domain.com"
myforward.subject = item.body
myForward.Send
End Sub

if there is more text and it's the first line, you'll need a little more code, but its still doable.
 
That seems to work will need to wait for a live test over the next 24hrs but so far so good .
Thanks heaps for your help
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
CWM030 A quick question for Diane about Exchange Exchange Server Administration 2
farrissf Outlook 2016 Optimizing Email Searches in Outlook 2016: Seeking Insights on Quick Search vs Advanced Search Features Using Outlook 0
A Quick Access Toolbar Not Showing Description Using Outlook 0
W Create a Quick Step or VBA to SAVE AS PDF in G:|Data|Client File Outlook VBA and Custom Forms 1
J Quick steps delete original email and move reply/sent email to folder Using Outlook 2
V How to add 'Previous Item' and 'Next Item' to the Quick Access Toolbar Using Outlook 1
J Text icon in Quick Access toolbar ? Using Outlook 2
Ken Pascoe Outlook Categories Quick List Using Outlook 0
G How to add a folder shortcut to outlook quick access toolbar? Using Outlook 6
S How to set up button in ribbon for individual Quick Steps Using Outlook 1
V Change default default save location to Quick Access Using Outlook 1
R Quick Access view in File Explorer when saving attachments Using Outlook 0
M font format discrepancies with Quick Parts Using Outlook 1
R Categorize Button in Quick Access Toolbar Disappears on New Email Using Outlook 1
R VBA Script Quick Parts Using Outlook 1
Diane Poremsky Synchronize Quick Access Toolbar and Ribbons? Using Outlook 0
C Quick Parts signatures suddenly require more letters Using Outlook 2
S Save in folder other than Sent when replying with Quick Steps Using Outlook 5
R Missing Quick Steps and Rules Using Outlook 0
A Quick Steps in Tasks view Using Outlook 7
J quick quesiton about outlook search Using Outlook 3
iwshim Skype tool bar in quick access ribon Using Outlook 1
B How can I adjust the ribbon width? I want to see all of my Quick Steps. Using Outlook 1
S Have Rule or Quick Step PROMPT for custom FLAG Due/Reminder date Outlook VBA and Custom Forms 3
L Quick step to fill custom field Outlook VBA and Custom Forms 1
B Push Quick Parts to All Users Using Outlook 1
R click to toggle quick click category reasigns to where ? Using Outlook 2
C Further automate several tasks with rule, VBA or Quick Step Using Outlook 1
L Outlook Data Files command not working in the quick access bar Using Outlook 1
S New Quick Step based on Team email QS - automatically update too Using Outlook 1
L Outlook 2010 Quick Print Attachment, nothing happend Using Outlook 0
B quick help with "changed by" field in a shared mailbox?? Using Outlook 3
A Recommend add-on or utility enabling quick Google search within Outlook Using Outlook 7
J Outlook 2010 using Quick Print to print attachments Using Outlook 1
M How can I customize the Follow Up Flag message in Quick Steps? Using Outlook 1
P Outlook closes down after clicking on the quick print icon. Using Outlook 3
S Outlook Quick Steps - Exchange 2003 / Exchange 2010 Exchange Server Administration 2
S Quick Search will not work due to itemizing Using Outlook 1
D Quick Parts - font changes Using Outlook 6
D Quick Parts - font changes Using Outlook 0
S Inserting Dates With Quick Parts (or Macros) Using Outlook 4
S Quick Parts - Changing Display and Order Using Outlook 0
E Blank Print Preview when access via the Quick Access toolbar Using Outlook 3
D How do I get a new mail icon into my quick launch bar? Using Outlook 3
K Quick Print shows wrong date on Occurrences Using Outlook 1
I Office 2010 Quick Steps Using Outlook 10
T Quick Access Toolbar Using Outlook 3
S Quick access toolbar in inspector window Outlook VBA and Custom Forms 3
G Question marks in messages Using Outlook 2
e_a_g_l_e_p_i Question about calendar Using Outlook 5

Similar threads

Back
Top