Date   : Tue, 10 Nov 2009 17:07:45 -0000
From   : mu.list@... (Mark Usher)
Subject: Who the message is from... Outlook fix

For those who want to create a button in Outlook to Reply to List, here is
some code for the macro behind it

-Mark

Sub Reply_list()

    Dim objItem As Object
    Dim objReply As MailItem
    
    Set objItem = GetCurrentItem()
    If objItem.Class = olMail Then
        ' create the reply, add the address and display
        Set objReply = objItem.Reply
        objReply.To = "bbc-micro@..."
        objReply.Display
        
    End If
    
    Set objReply = Nothing
    Set objItem = Nothing
    

End Sub

Function GetCurrentItem() As Object
    Dim objApp As Outlook.Application
        
    Set objApp = Application
    On Error Resume Next
    Select Case TypeName(objApp.ActiveWindow)
        Case "Explorer"
            Set GetCurrentItem = objApp.ActiveExplorer.Selection.Item(1)
        Case "Inspector"
            Set GetCurrentItem = objApp.ActiveInspector.CurrentItem
        Case Else
            ' anything else will result in an error, which is
            ' why we have the error handler above
    End Select
    
    Set objApp = Nothing
End Function



> -----Original Message-----
> From: bbc-micro-bounces+mu.list=aon.at@... [mailto:bbc-
> micro-bounces+mu.list=aon.at@...] On Behalf Of Andrew
> Benham
> Sent: 10 November 2009 16:33
> To: bbc-micro@...
> Subject: Re: [BBC-Micro] Who the message is from...
> 
> Mick Champion wrote:
> 
> > It stays in the same place on my version of TB ( 2.0.0.23). It greys
> > out when no list is available. Are you using the same add on version
> > as above? One of the links went to v.0.4.0?? Here is what my version
> > looks like with no list to reply to ;
> > http://rs432.net/greyreplylist.JPG
> 
> I've just (up|down|left|right)-graded my add-on to v0.4.2 (the latest
> available) and yes, the button is greyed out when not usable.
> 
> > Secondly, the reply to list stayed
> > faded out so back to hitting "reply all", delete your e-mail and
> > change bbc list field from "cc" to "to" You've got to laugh :-)
> 
> I don't see that - reply to list is available for my BBC list messages,
> no matter how I sent them.
> 
> --
> Andrew Benham           adsb@...
> Southgate, London N14, United Kingdom
> 
> The gates in my computer are AND OR and NOT, not "Bill".
> 
> _______________________________________________
> bbc-micro mailing list
> bbc-micro@...
> http://lists.cloud9.co.uk/mailman/listinfo/bbc-micro