---

Hallo Ihr lieben,

die Suche konnte mir leider nicht weiter helfen.
Aber ich denke für euch ist das ne Kleinigkeit.

Folgende Aufgabe möchte ich automatisieren.

Es gibt eine Baugruppe mit mehreren Parts.
In jedem Part gibt es einen Body Namens: Rohteil
und ein geometrisches Set Namens: Fraesumriss

Wie man aus den Namen schon ableiten kann, beinhalten die beiden visuelle Informationen für die NC-Programmierung.

Problem ist, wenn man sich die Teile in der Konstruktion nach mal ansehen möchte, muss man händisch erstmal alles ausblenden.
Für die Programmierung muss dann alles wieder händisch eingeblendet werden.

Ich möchte dieses Schritt Produktübergreifend per Makro erledigen lassen.
So das ich letztlich mit einem Button im Catia die beiden Bauteile (Body und Set) ein und ausblenden kann.

Für eure Vorschlage und Hilfe wäre ich sehr dankbar

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus

Ich würde einfach über die Suche die Elemente selektieren und dann ein- bzw ausblenden. zB

Code:

---

Sub CATMain()

Dim selection1 As Selection
Set selection1 = CATIA.ActiveDocument.Selection

selection1.Search "(CATPrtSearch.BodyFeature.Name=Rohteil + CATPrtSearch.OpenBodyFeature.Name=Fraesumriss),all"

Dim visPropertySet1 As VisPropertySet
Set visPropertySet1 = selection1.VisProperties

dim showState
visPropertySet1.GetShow showState

if showState <> 0 then
  visPropertySet1.SetShow 0
else
  visPropertySet1.SetShow 1
end if

selection1.Clear

End Sub

---

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP