Hi everyone,
About VBA usage in zwcad:
How can I get the coordinates from a point contained in a SelectionSet?
It seems I can get the point only using a PointEntity, but this way I can't reach its xyz coords.

Hello, try this routine:

Private Sub get_xyzpoints()
Dim i As Long
Dim xyz As ZwCAD.ZwcadPoint
Dim ss As ZwcadSelectionSet
Dim FilterType(0) As Integer
Dim FilterData(0) As Variant
FilterType(0) = 0
FilterData(0) = "Point"
Set ss = ZwCAD.ActiveDocument.SelectionSets.Add("SS2")
ZwCAD.ActiveDocument.Utility.Prompt "Select the points: "
ss.SelectOnScreen FilterType, FilterData
Set xyz = New ZwcadPoint
For i = 0 To ss.Count - 1
xyz.x = ss(i).Coordinates(0).x
xyz.y = ss(i).Coordinates(0).y
xyz.z = ss(i).Coordinates(0).z
Next i
End Sub

thx!

You are welcome!