Dassault Systemes - Vba 7.1

' Create sketch on XY plane Dim originElements As OriginElements Set originElements = part1.OriginElements Dim xyPlane As Reference Set xyPlane = originElements.PlaneXY

Exit Sub ErrHandler: MsgBox "Error " & Err.Number & ": " & Err.Description End Sub This guide gives you a solid foundation for . Start by recording simple macros, study the generated code, then progressively build your own automation for part design, drawing generation, assembly constraints, or data extraction. dassault systemes vba 7.1

' Access parameters collection Dim params As Parameters Set params = part.Parameters ' Create sketch on XY plane Dim originElements