ConnectToServer(myCo, "FOO.myCoClass") Dim myCoInternal As FOO.imyWantedinterface Set myCoInternal = myCo ' now myCoInternal can access ImyWantedinterface's methods myCoInternal.doit ' Works