Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

  • Congratulations waross on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

How do I hide all the 3D dimensions /annotations in CATIA 1

Status
Not open for further replies.

Simone3121

Automotive
Oct 16, 2019
1
CA
I got the CAD file from customer with annotations on each of the parts. I tried to search the annotations by Ctrl+F, couldn't find it. Does anyone know how to search and select all the 3D dimensions?

Thanks,
 
Replies continue below

Recommended for you

all the annotations are found in Annotation Sets, so by hiding those, all captures and views will be hidden. Search for WorkBench Type: Functional Tolerancing & Annotation, Type: Annotation Set

regards,
LWolf
 
Here is the Macro I use to quickly turn off all annotations.

Code:
Sub CATMain()

Set  ProductDocument1 = CATIA.ActiveDocument
Set Product1 = ProductDocument1. Product

Dim ProductDoc1_As_Document
Set ProductDoc1 = Catia.ActiveDocument

Dim Selection1_As_Selection
Set Selection1 = ProductDoc1.Selection

selection1.Search "CATTPSSearch.CATFTAElement,all"
Set visPropertySet1 = Selection1.visProperties
VisPropertySet1.SetShow 1
Selection1.Clear

Dim specsAndGeomWindow1 As Window
Set specsAndGeomWindow1 = CATIA.ActiveWindow

Dim viewer3D1 As Viewer
Set viewer3D1 = specsAndGeomWindow1.ActiveViewer

Dim viewpoint3D1 As Viewpoint3D
Set viewpoint3D1 = viewer3D1.Viewpoint3D

viewer3D1.Reframe 

Set viewpoint3D1 = viewer3D1.Viewpoint3D



End Sub
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top