Transform a point3d

Hello,

I try unsuccessfully (poor English) in vba help to find a function to apply a transformation3d to a point3d.

I use a line to calculate the point :

dim Trns as Transform3D

dim Mypoint as point3d

dim MyNewPt as Point3d

Trns = Transform3dMatrix3dAndFixedPoint3d(Matrix3dInverse(View.Rotation) , Point)) 'Point is dynamic...

Dim LinT as lineelement ' Temporaire

Set linT= createlineelement1 (Nothing,Point3dzero,Mypoint)

lint.Transform Trns

MyNewPt=linT.EndPoint

Is There a better way ? Certainly I think

Merci d'avance

Laurent