Can Dimensions be "stretched" via VBA

[RickyD302]

I've been banging my head on how to stretch a dimension via VBA. When I add a dimension to a selection set and then move the object the whole dimension moves. What I want to do is just move that control point and leave the other end fixed. Ideas? Work arounds? I thought about sendcommand but then I'd have to convert all my points to strings.....NOT.

 

[TCARPENTER]

Hi RickyD302,

You'll need to move the endpoint or startpoint of the dimension entity, not the entire dimension itself.

HTH
Todd

 

[RickyD302]

And here lies the problem. How do I get the endpoints of the dimension via VBA. I tried to use a selection set but not luck. any ideas. I'm to the point right now that I'm using ThisDrawing.sendcommand ("stretch",........)

 

[TCARPENTER]

Hi RickyD302,

look at the ExtLine1Point and ExtLine2Point properties for dimaligned entities in the help files, this should get you what you need.

HTH
Todd

 

[RickyD302]

I'm working with dimrotated so the ExtLine1 & 2 points are not exposed. I'm working on getting those points via visual lisp. I'm new to all this stuff.