Results 1 to 5 of 5
  1. #1
    New Lounger
    Join Date
    Oct 2001
    Location
    Oklahoma
    Posts
    5
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Creating a custom forward button (Outlook 2000/2002)

    I asked this about ten days ago, but got no replies. And I haven't figured it out since then <img src=/S/hairout.gif border=0 alt=hairout width=31 height=23>. So here it goes again...

    I'm trying to create a toolbar button that forwards email(s) to a specific person. I can create a "generic" forwarding button similar to the way i create a custom email button: right-click on the toolbar, choose Customize, then Action and select Forward. But how do I (or can I?) select the email address of the person I want to forward the messages to? Adding a <font face="Comic Sans MS">mailto:</font face=comic> hyperlink makes Outlook revert to a new mail message. Is there some way of adjusting the button's name, or is there a macro/script available that does this?

    I haven't found anything in XP <font face="BrushScript BT">Special Edition</font face=brush> that mentions it. But it seems such a common need that surely someone has found the solution already...

    <img src=/S/help.gif border=0 alt=help width=23 height=15>,
    Monty

  2. #2
    5 Star Lounger
    Join Date
    May 2001
    Location
    Washington, USA
    Posts
    750
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Creating a custom forward button (Outlook 2000/2002)

    Maybe the block of code below will do what you want. I put a button on the mail read form and attached this macro to it.

    Sub fwdItem()
    Dim objApp As Application
    Dim objItem As Object
    Dim objRecip As Object
    Dim objNewItem As Object
    Set objApp = CreateObject("Outlook.Application")
    Set objItem = objApp.ActiveInspector.CurrentItem
    Set objNewItem = objItem.Forward
    objNewItem.To = "PutTheRecipientEmailHere"
    objNewItem.Recipients.ResolveAll
    objNewItem.Display

    End Sub

  3. #3
    New Lounger
    Join Date
    Oct 2001
    Location
    Oklahoma
    Posts
    5
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Creating a custom forward button (Outlook 2000/2002)

    It keeps stopping at this line:
    Set objItem = objApp.ActiveInspector.CurrentItem
    and informs me of the following error.
    Runtime error "91"
    Object variable or With block variable not set.

    Am I doing something wrong?

  4. #4
    New Lounger
    Join Date
    Oct 2001
    Location
    Oklahoma
    Posts
    5
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Creating a custom forward button (Outlook 2000/2002)

    OK, I got it working--It works from the Read Mail view, but not from the preview, which I can live with for now.

    Thank you so much. What do think the chances are of getting MS to include this as a feature in a future release?

  5. #5
    5 Star Lounger
    Join Date
    May 2001
    Location
    Washington, USA
    Posts
    750
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Creating a custom forward button (Outlook 2000/2002)

    Yeh, this code would only run from an open item because it refers to the current item. You could have a macro that works from the preview. It would have to reference the active explorer and selection. Having one macro that works in either situation could be a little tricky I think, but I'll try and grab some time to look at it.

Posting Permissions

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