This What I just did. Hopefully I pulled out all the right lines.
Dim oDoc As Inventor.Document
Dim oDrawingView As DrawingView
Set oDoc = ThisApplication.ActiveDocument
Set oDrawingView = oDoc.ActiveSheet.DrawingViews(1)
'get the scale and display in a textbox
BaseViewScale = oDrawingView.Scale
BaseViewScaleBox.Value = BaseViewScale
In another sub, I have these lines to set the view scale.
'
BaseView Scale = BaseViewScaleBox.Value
oDrawingView.[Scale] = BaseViewScale
"596198818" wrote in message
news:5808191.1109764152308.JavaMail.jive@jiveforum1.autodesk.com...
>I am trying to access the scale value of a base view in an idw file. I
>intend to open an idw file, then alter the scale of the base view through
>VB. Can anyone help me out with some code.
>
> Thanks
