A Microsoft Outlook email forum. Outlook Banter

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » Outlook Banter forum » Microsoft Outlook Email Newsgroups » Outlook and VBA
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

Tags: , , , , ,

Script to forward e-mail to address in Subject line





 
 
Thread Tools Display Modes
  #1  
Old September 6th 06, 08:50 PM posted to microsoft.public.outlook.program_vba
mleviton@juno.com
external usenet poster
 
Posts: 2
Default Script to forward e-mail to address in Subject line

Is there a script I can run that will pull the e-mail address out of an
message's subject line and forward the message to that address?

Thanks for any help,
PPT

Ads
  #2  
Old September 6th 06, 10:25 PM posted to microsoft.public.outlook.program_vba
Eric Legault [MVP - Outlook]
external usenet poster
 
Posts: 817
Default Script to forward e-mail to address in Subject line

Run this macro from the currently open e-mail message:

Sub ForwardActiveEmail()
Dim objForward As Outlook.MailItem

If ActiveInspector.CurrentItem.Class = olmail Then
Set objForward = ActiveInspector.CurrentItem.Forward
objForward.To = ActiveInspector.CurrentItem.Subject
objForward.Display 'or .Send
End If

Set objForward = Nothing
End Sub

--
Eric Legault (Outlook MVP, MCDBA, MCTS: Messaging & Collaboration)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/


" wrote:

Is there a script I can run that will pull the e-mail address out of an
message's subject line and forward the message to that address?

Thanks for any help,
PPT


  #3  
Old September 7th 06, 02:45 PM posted to microsoft.public.outlook.program_vba
mleviton@juno.com
external usenet poster
 
Posts: 2
Default Script to forward e-mail to address in Subject line

Great, thanks Eric.

Eric wrote:
Run this macro from the currently open e-mail message:

Sub ForwardActiveEmail()
Dim objForward As Outlook.MailItem

If ActiveInspector.CurrentItem.Class = olmail Then
Set objForward = ActiveInspector.CurrentItem.Forward
objForward.To = ActiveInspector.CurrentItem.Subject
objForward.Display 'or .Send
End If

Set objForward = Nothing
End Sub

--
Eric Legault (Outlook MVP, MCDBA, MCTS: Messaging & Collaboration)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/


 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Can I mve multiple address in rec mail to contacts from to: line Ken Outlook - Using Contacts 1 July 13th 06 04:09 PM
Subject line Peter Outlook Express 1 May 21st 06 11:10 AM
Out of office Subject Line Outlook - General Queries 3 May 10th 06 02:04 PM
Mail merge Contacts fields into subject line of email TheScenicRoute Outlook - Using Contacts 5 April 14th 06 03:02 PM
lost subject line Tony Iorio Outlook - General Queries 1 January 18th 06 12:56 PM


All times are GMT +1. The time now is 03:44 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2008, Jelsoft Enterprises Ltd.Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2008 Outlook Banter, part of the NewsgroupBanter project.
The comments are property of their posters.
Debt Consolidation - Mortgage Calculator - CreditCards - Ringtones - Gym Lockers