Catia VBA: Select objects by "Intersecting Rectangle Selection Trap"

[man2007]

Is there a function in CATIA VBA to select objects by using "Intersecting Rectangle Selection Trap" method?

 

[ferdo]

Hi,

Maybe

Dim Sel3(0)
Sel3(0) = "Product"
Status = ProdSel.SelectElement3(Sel3,"Trap select the products to copy",True,CATMultiSelTriggWhenSelPerf,False)
If (Status = "Cancel") then Exit Sub

Regards
Fernando

https://picasaweb.google.com/102257836106335725208

- Romania

https://picasaweb.google.com/103462806772634246699/

- EU

 

[man2007]

Dear Ferdo, the solution is fine if I need to give user the choice of selection.
But here I want to feed the diagonal points of rectangular selection thru code.
Let me explain what I am trying for.
I have coordinates of a point and I want to select the point with smallest possible rectangular trap (yes with crossing rectangular trap), which in turn selects a Surface, whose name needs to be captured and reported in excel.
Or is there a way to check if a point is exactly on a selected surface?
Or is it possible to check the nearest possible point near a surface?

 

[itsmyjob]

you can always check the distance point-surface

Eric N.
indocti discant et ament meminisse periti ​