I have a CPoint class module that helps me work with the coordinates of the elements. I don't have to work with arrays. I made something like that: ' change the insertion point of an AcadText Dim pPoint as CPoint pPoint = EGUtil.PointFromArray3d(pText.InsertionPoint) ' change coordinates pPoint.X = 5 : pPoint.Y = 10: pPoint>X = 0# ' save back to original element pText.InsertionPoint = EGUtil.Array3dFromPoint(pPoint) If anyone has interest in that contacts me. Ari C. Raimundo Engefoto S/A Curitiba-PR-Brazil