Results 1 to 4 of 4
  1. #1
    2 Star Lounger
    Join Date
    Mar 2003
    Posts
    174
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Copy Message to Subject Line (Outlook 2003)

    Is it possible to automatically
    1. Copy the message body of an email to the subject line (as much as possible and deleting blank lines and extra space)
    2. Then auto-forward it to another email address (using auto-rules).
    The auto-forward function is already there, but how can I do the first part (copy the message to the subject line and delete extra line/space)?

  2. #2
    Uranium Lounger
    Join Date
    Dec 2000
    Location
    Salt Lake City, Utah, USA
    Posts
    9,508
    Thanks
    0
    Thanked 6 Times in 6 Posts

    Re: Copy Message to Subject Line (Outlook 2003)

    You would need to write Outlook VBA code to handle this, and then use the "Run a script" option under the "Select Actions" part of the Rules Wizard dialog. There are several threads in this Forum on tying code to Rules, especially from JScher2000. "Run a script" code must be coded so that the item which is being acted upon by the rule is passed to the code as an argument.

    I don't know if there is a maximum number of characters for the subject line. The code would be something like (untested air code):

    Sub myFwdRule(myMessage as Item)
    With myMessage
    .Subject = .Body
    .Save
    End With
    End Sub
    -John ... I float in liquid gardens
    UTC -7ąDS

  3. #3
    Super Moderator jscher2000's Avatar
    Join Date
    Feb 2001
    Location
    Silicon Valley, USA
    Posts
    23,112
    Thanks
    5
    Thanked 93 Times in 89 Posts

    Re: Copy Message to Subject Line (Outlook 2003)

    Maybe just copy the first 40-50 characters from the body. Very long subject lines might cause your message to be flagged as spam. (Or it might cause an error that prevents your rule from being applied until you return to the computer and clear it.)

  4. #4
    Uranium Lounger
    Join Date
    Dec 2000
    Location
    Salt Lake City, Utah, USA
    Posts
    9,508
    Thanks
    0
    Thanked 6 Times in 6 Posts

    Re: Copy Message to Subject Line (Outlook 2003)

    Good point, and it would be approppriate to take out line breaks:

    .Subject = Left(Replace(.Body, vbCrLf, ""),100)
    -John ... I float in liquid gardens
    UTC -7ąDS

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •