05-11-2023
05:44 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
05-11-2023
05:44 AM
You can create a fixed plane, here is an example:
Dim oDef As AssemblyComponentDefinition = ThisDoc.Document.ComponentDefinition
Dim oWPlane As WorkPlane
Dim oAxis As WorkAxes
oAxis = oDef.WorkAxes
Dim oOriginPnt As Point
Dim oXaxis As UnitVector
Dim oYaxis As UnitVector
oOriginPnt = ThisApplication.TransientGeometry.CreatePoint(0, 0, 0)
oXaxis = ThisApplication.TransientGeometry.CreateUnitVector(1, 0, 1) '45 deg
oYaxis = ThisApplication.TransientGeometry.CreateUnitVector(0, 1, 0)
oWPlane = oDef.WorkPlanes.AddFixed(oOriginPnt, oXaxis, oYaxis)
oWPlane.Name = "Plane_Name"
Andrii Humeniuk - CAD Coordinator, Autodesk Certified Instructor
LinkedIn | My free Inventor Addin | My Repositories
Did you find this reply helpful ? If so please use the Accept as Solution/Like.