08-28-2023
02:58 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
08-28-2023
02:58 AM
You can move the dimension text to the left side, for example of the code looks like this:
Dim oDoc As DrawingDocument oDoc = ThisApplication.ActiveDocument Dim oDimensions As DrawingDimensions oDimensions = oDoc.ActiveSheet.DrawingDimensions oDimension1 = oDimensions.Item(12) oDimension1.Text.Origin = "Yours new position dimension as Point2d"
Try changing the size of the dimension arrows.You can also consider creating a drawing that will be more legible.