Any reliable way for a MailItem_Reply event in Outlook's VBA?

Hi! I would need to hook in a reliable way to the Reply-Event with a VBA outlook macro.
The code I have currently is the following:

Private WithEvents CurrentExplorer As Explorer
Private WithEvents CurrentMailItem As MailItem
....
Private Sub Application_Startup()
  ..
  Set CurrentExplorer = Application.ActiveExplorer
  ..
End Sub

Private Sub CurrentExplorer_SelectionChange()
  ..
  Set CurrentMailItem = CurrentExplorer.Selection.Item(1)
  ..
End Sub

Private Sub CurrentMailItem_Reply(ByVal Response As Object, Cancel As Boolean)
  ... do something here..
End Sub

But that only works if the user really selects an item and then reply it.
If he right-clicks on a non-selected item, this event will not be called, because the selection did not change then.
But I also would need to know in such case that the user answers the email.

I already tried to hook into the Application_ItemLoad Event:

Private Sub Application_ItemLoad(ByVal Item As Object)
    If TypeOf Item Is Outlook.MailItem Then
        Set CurrentLoadedMailItem = Item
    End If
End Sub

and then hook this "CurrentLoadedMailItem.Reply"-Event. But the Reply-Event is never called in this way..

Is there any way I can get the event called always when the users answers an email?
Background is that I want to set a property to the new answer email, because for my macro I need to know the relation between answer and answered email.
I need to know for an answer email for which email that answer is.