Community
How to modify this code to create a linear diameter?
Dim Sheet_1 = ThisDrawing.Sheets.ItemByName("Sheet:1") Dim view_A = Sheet_1.DrawingViews.ItemByName("A") Dim Face0 = view_A.GetIntent("Part:1", "Face0") 'Part:1 Assign name "Face0" Dim Z_Axis = view_A.GetIntent("Z Axis") 'Assembly ZAxis Dim genDims = Sheet_1.DrawingDimensions.GeneralDimensions Dim linDim1 = genDims.AddLinear("Dimension 1", view_A.SheetPoint(-0.5, 1.05), Face0)
Solved! Go to Solution.
Solved by theo.bot. Go to Solution.
Please refer below forum discussion for creating linear diameter dimension.
Thanks and regards,
you just need to add the dimension style to you code:
Dim linDim1 = genDims.AddLinear("Dimension 1", view_A.SheetPoint(-0.5, 1.05), Face0,kDiametricDimensionType)
Can't find what you're looking for? Ask the community or share your knowledge.