12-15-2022
03:51 PM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
12-15-2022
03:51 PM
OK, forward movement. I found the line I need to change the model state in the view. Still some work to do here. There were some odd results with the part number field in the title block, like it wasn't updating with the model state change. I may just need to add a line to save before I print. Will try to work that out tomorrow unless someone has a suggestion. Until then, the update I made to the generate rule is below.
oDoc = ThisApplication.Documents.Open(dwgFile)
Dim View As DrawingView
For Each sheet As Sheet In oDoc.Sheets
Sheet.Activate
Try
If Sheet.DrawingViews.Count > 0 Then
For Each View In Sheet.DrawingViews
If View.Name = "FRONT" Then
View.SetActiveModelState(model_state_fin)
End If
Next
End If
Catch
End Try
Next