InputObjectType(0) -> problem???

[aponsardin]

Hi everybody

Does anyone know why I cannot select a point with the following code. If I replace "Point" by "Face" the code works...

Thank you for your help


This is my code:

--------------------------------------------------------
InputObjectType(0) = "Point"
Status = Selection.SelectElement2(InputObjectType, "Select the Point to draft", True)
If (Status = "cancel") Then Exit Sub
Set PointToDraft = Selection.Item(1).Value
Selection.Clear
Name1 = PointToDraft.Name
MsgBox (Name1)
------------------------------------------------------

 

[PeterGuy]

you could try this magic word as the automation type for selection "ZeroDim"

 

[aponsardin]

Hi PeterGuy,

Thanks for your help, I'll try...

Alex