VB6 Select a Face within Part of Assembly

SF 2010-07-07

I am trying to select a face that I gave a name previously. This face is within a part, within an assembly. This is the (stripped) code. It runs fine, but nothing gets selected in the viewport nor when I try to apply a mate to the selection (I get error swAddMateError_IncorrectSelections because nothing is selected). But I do get the right face in the swFace object, but somehow it does not get selected. I tried using a SelectionManager but without success.

Dim swApp As New SldWorks.SldWorks

Dim swModel As Object

Dim swAssem As AssemblyDoc

Dim swFace As SldWorks.Face2

Dim swEnt As SldWorks.Entity

Dim swPart As SldWorks.PartDoc

Dim bRet As Boolean

Set swApp = CreateObject("SldWorks.Application")

Set swModel = swApp.ActiveDoc

Set swAssem = swModel

Set swComponent = swAssem.AddComponent4("Male.SLDPRT", "", 0, 0, 0)

Set swPart = swComponent.GetModelDoc2

Set swFace = swPart.GetEntityByName("faceName", swSelectType_e.swSelFACES)

Set swEnt = swFace

Debug.Print swPart.GetEntityName(swFace) 'output: faceName

bRet = swEnt.Select4(True, Nothing): Debug.Print bRet 'output: True

Can anyone help me how to select the face properly? When I rewrite it to work within a SLDPRT, it works, so I think it is related to the fact that I import a component in an assembly. But I cannot think why Select4 should behave differently.

Solidworks Api macros