Message 1 of 3

Not applicable
12-05-2017
10:19 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
i Need help on getting flat pattern. The code below works in ilogic, but i need it to run straight from the VBA editor.
Dim oBaseViewOptions As Inventor.NameValueMap
Set oBaseViewOptions = ThisApplication.TransientObjects.CreateNameValueMap
'
''True = folded view
''False = flat pattern view
oBaseViewOptions.Add("SheetMetalFoldedModel", False)
' Create the drawing view.
Dim oView1 As DrawingView
Set oView1 = oSheet.DrawingViews.AddBaseView(oPartDoc, oPoint1, 1#, kDefaultViewOrientation, kHiddenLineDrawingViewStyle, , , oBaseViewOptions)
Solved! Go to Solution.