VBA to Inactivate View from current sheet 1

[Amathex]

Hi,

I'm trying to inactivate view since I have previously activate it for modification purpose. Unfortunatly, I did'nt find any opposite method of Drawingview.activate. Does any one know a way to do this in VBA.

Thanks

 

[ferdo]

Hi,

What about activating another view? Or the sheet - CATIA.StartCommand "Activate Sheet" ?

Regards
Fernando

https://picasaweb.google.com/102257836106335725208

https://picasaweb.google.com/103462806772634246699/

 

[Amathex]

Hi Ferdo,

I want to close my drawing without any active view. Activate a sheet does not desactivate view.

Regards

 

[ferdo]

Interesting, for me it does...

Language="VBSCRIPT"
Sub CATMain()

CATIA.StartCommand "Fit All In"

Dim drawingDocument1 As Document
Set drawingDocument1 = CATIA.ActiveDocument
Dim selection1 As Selection
Set selection1 = drawingDocument1.Selection
selection1.Search "Name=Sheet*,all"

CATIA.StartCommand "Activate Sheet"
selection1.Clear

CATIA.StartCommand "Save"

End Sub

Regards
Fernando

https://picasaweb.google.com/102257836106335725208

https://picasaweb.google.com/103462806772634246699/

 

[Amathex]

Hi Ferdo,

Your right, if I make search to select all Sheet, it works find. I don't understand why ?

Thanks for your support