Catia VBA: View.Size
Catia VBA: View.Size
(OP)
I tried to use View.Size to find the bounding rectangle of a view, but could not do so.
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS Come Join Us!Are you an
Engineering professional? Join Eng-Tips Forums!
*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail. Posting GuidelinesJobs |
|
RE: Catia VBA: View.Size
CODE --> VBA
Sub View_Box() Dim DrwDocument As DrawingDocument Set DrwDocument = CATIA.ActiveDocument Dim oDrawing As DrawingDocument Set oDrawing = CATIA.ActiveDocument Dim oSheets As DrawingSheets Set oSheets = oDrawing.Sheets Dim oSheet As DrawingSheet Set oSheet = oSheets.Item(1) Dim oView As DrawingView Set oView = oSheet.Views.Item(3) oView.Activate Dim oView2 Set oView2 = oView Dim oXY(4) ' oView2.Size oXY Xmin = oXY(0) Xmax = oXY(1) Ymin = oXY(2) Ymax = oXY(3) End Sub______
Alex ,
RE: Catia VBA: View.Size
I hadn't used
Dim oView2
Set oView2 = oView
Dim oXY(4)
which gave me error.