I have found this code in VB to get the ReplyTo address.  Can anybody
tell me how to declare the Reply object?

Set objReply = objMsg.Reply
 On Error Resume Next
 Set objRecip = objReply.Recipients.Item(1)
 If Err = 0 Then
   ' address will be in Name or Address depending
   ' on sending application and type of address
   strAddress = objRecip.Address
   If strAddress = "" Then
     strAddress = objRecip.Name
   End If
 ElseIf Err = 287 Then
   'handle possible security patch error
   strAddress = ""
   MsgBox "The Outlook E-mail Security Patch is " & _
          "apparently installed on this machine. " & _
          "You must response Yes to the prompt about " & _
          "accessing e-mail addresses if you want to " & _
          "get the Reply To address.", vbExclamation, _
          "GetReplyToAddress"
 End If