I would create a code in vba, replace old code to new code, at old code coordinate the object display at massagebox, but for new code i want displace at userform, as example i have a line from coordinate 0,0,0 to 10,5,0.
How to display coordinate start point and end point ?
here my old code
Sub sgcc()
Dim ObjEnt As AcadEntity
Dim Pt As Variant
ThisDrawing.Utility.GetEntity ObjEnt, Pt, "Pick an object"
Dim PtX As Double
Dim PtY As Double
Dim PtZ As Double
PtX = Pt(0)
PtY = Pt(1)
PtZ = Pt(2)
MsgBox "Coordinate X is = " & PtX _
& vbCr & "Coordinate X is = " & PtY _
& vbCr & "Coordinate X is = " & PtZ
End Sub