Macro to change Display Style of Drawing View
Macro to change Display Style of Drawing View
(OP)
Does anyone have a Macro which will change all drawing views to a particualr Display Style (e.g. HLR, Shaded)? We like to show our assembly drawings in shaded but it makes it very slow to work with them.






RE: Macro to change Display Style of Drawing View
Try this macro
Dim swApp As SldWorks.SldWorks
Dim swDraw As SldWorks.DrawingDoc
Dim swView As SldWorks.View
Sub main()
Set swApp = Application.SldWorks
Set swDraw = swApp.ActiveDoc
Set swView = swDraw.GetFirstView
While Not swView Is Nothing
swView.SetDisplayMode swDisplayMode_e.swSHADED
Set swView = swView.GetNextView
Wend
swDraw.EditRebuild
End Sub
Please modify the swDisplayMode_e enumerator's value to display the view you would like.
Thanks,
Artem
Artem Taturevich
CSWP
RE: Macro to change Display Style of Drawing View