AnsweredAssumed Answered

Select Face by Entity Name

Question asked by Keaton Warn on Jun 27, 2019
Latest reply on Jun 27, 2019 by Keaton Warn
  • Comment • 2

I thought I knew how to do this but apparently not.

 

I can successfully name and rename the entity property name for the faces on a part, but I don't know how to select them using these names. 

 

Before I run the face-naming code:

After I run the face-naming code:

 

However, if I want to select one of the faces by their new names in the code, how do I do that? I thought it had something to do with the method where you select by using a line similar to:

bool = Entity.Select4(Boolean, Data)

but my mind is foggy at the moment so I don't know and haven't found any examples that clear it up.

Dan Eldred
Dan Eldred Jun 27, 2019 2:54 PM
Correct Answer

just did a test and this worked for me.

Sub main()

    Dim swModel As SldWorks.ModelDoc2
    Dim swPart As SldWorks.PartDoc
    Dim swFace As SldWorks.Face2
    Dim swEnt As SldWorks.Entity
    Dim swSelMgr As SldWorks.SelectionMgr
    Dim swSelData As SldWorks.SelectData
    Dim boolstatus As Boolean
    
    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    Set swPart = swApp.ActiveDoc
    Set swSelMgr = swModel.SelectionManager
    Set swFace = swPart.GetEntityByName("SquareFace01", swSelFACES)
    Set swEnt = swFace
    Set swSelData = swSelMgr.CreateSelectData
    
    boolstatus = swEnt.Select4(True, swSelData)
    Debug.Print boolstatus
    
End Sub
See the reply in context
No one else had this question

Outcomes