How to hide planes 1

[llbbyy]

After finishing design, a lot's planes are shown in a mess, how to make a macro to hide all the plane?

 

[ferdo]

Please use search function of the forum, you will find the answer. You can search also CATIA Portable Script Center here or on Internet.

Regards
Fernando

https://picasaweb.google.com/102257836106335725208

- Romania

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

- EU

 

[llbbyy]

ferdo, I found the answer in the forum,Thank you very much.

 

[Daniel Popa]

Language="VBSCRIPT"

Sub CATMain()

Set productDocument1 = CATIA.ActiveDocument

Set product1 = productDocument1.Product

Set productDocument1 = CATIA.ActiveDocument

Set selection1 = productDocument1.Selection

selection1.Search "CatPrtSearch.Plane,All"

Set visPropertySet1 = selection1.VisProperties

visPropertySet1.SetShow catVisPropertyNoShowAttr

selection1.Clear 

End Sub