Hello,
I want to make dimensions between a first point "Origine" and a second point ("Point.1") on horizontal axis and vertical axis, I made this and it works:
Sub CATMain()
Set DrwDocument = CATIA.ActiveDocument 'drawingDocument1
Set DrwSheets = DrwDocument.Sheets 'drawingSheets1
Set...