Estoy desarrollando un proyecto VBA en Word y he encontrado un problema con el manejo de eventos al usar una clase que implementa otra.

Defino una clase vacíaIMyInterface:

Public Sub Xyz()
End Sub

Public Event SomeEvent()

Y una claseMyClass que implementa lo anterior:

Implements IMyInterface

Public Event SomeEvent()

Public Sub Xyz()
  ' ... code ...
  RaiseEvent SomeEvent
End Sub

Private Sub IMyInterface_Xyz()
   Xyz
End  Sub

Si creo una tercera clase,OtherClass, que declara una variable miembro con el tipo de la clase de interfaz:

Private WithEvents mMy As IMyInterface

e intente inicializar esta variable con una instancia de la clase implementadora:

Set mMy = New MyClass

Recibo un error de tiempo de ejecución '459': este componente no admite este conjunto de eventos.

losPágina de MSDN para este mensaje de error dice:

"Intentó utilizar una variable WithEvents con un componente que no puede funcionar como origen de eventos para el conjunto de eventos especificado. Por ejemplo, puede estar hundiendo eventos de un objeto y luego crear otro objeto que implemente el primer objeto. Aunque podría pensar que podría hundir los eventos del objeto implementado, que no es el caso automáticamente. Implementa solo implementa una interfaz para métodos y propiedades ".

Lo anterior resume más o menos lo que estoy tratando de hacer. La redacción, "ese no es el caso automáticamente", en lugar de "esto es completamente imposible", parece sugerir que hay un poco de trabajo manual que necesito hacer para que funcione, pero no es así. Dimequé! ¿Alguien sabe si esto es posible en VBA?