Figured it out.
Dim oDim As DimensionConstraint
Set oCoord1 = oTG.CreatePoint2d(2.5, -3)
Set oDim = oSketch.DimensionConstraints.AddOffset(oLine1, oCenterLine, oTG.CreatePoint2d(-5, 0), True, False)
oDim.Parameter.Name = "TEST"
Did you find this reply helpful ? If so please use the Accept as Solution or Kudos button below.
---------------------------------------------------------------------------------------------------------------------------
Inventor 2010 Certified Professional
Currently using 2023 Pro
