VBA verifique se a classe implementa a interface

If TypeOf objectParameter Is IMyInterface Then
'do stuff
End If
VasteMonde