VBA проверьте, если класс реализует интерфейс

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