cangevine
Industrial
- May 14, 2004
- 19
I’m trying to write a simple macro that will put the three standard views on a drawing. I have found many threads that discuss this topic. I've also found a few macros to do this. I’m pretty sure the code should include:
swApp.SetUserPreferenceToggle swAutomaticScaling3ViewDrawings, True
bViews = swDrawing.Create3rdAngleViews2(swFileName)
The problem is that the inserted drawing views scale to fit, but the drawing sheet scale stays at 1:1. I have other macros that I use that require the Views to “Use Sheet Scale.”
I also tried: “Set myView = Part.CreateDrawViewFromModelView3(Model)” and got the same result. The only way they seem to match up is if I use the “DropDrawingViewFromPalette2” method. This seems like a cumbersome way to go about it.
Is there something I’m missing? Thanks.
Chris
swApp.SetUserPreferenceToggle swAutomaticScaling3ViewDrawings, True
bViews = swDrawing.Create3rdAngleViews2(swFileName)
The problem is that the inserted drawing views scale to fit, but the drawing sheet scale stays at 1:1. I have other macros that I use that require the Views to “Use Sheet Scale.”
I also tried: “Set myView = Part.CreateDrawViewFromModelView3(Model)” and got the same result. The only way they seem to match up is if I use the “DropDrawingViewFromPalette2” method. This seems like a cumbersome way to go about it.
Is there something I’m missing? Thanks.
Chris