---

Hi,
ich möchte mit Hilfe eines Makros bestimmte Parameter und Formeln löschen. Diese wähle ich mit Hilfe der Suchfunktion aus. Leider funktioniert das Makro bisher nur bei einem einzelnen part mit einem bestimmten Namen. Ich möchte aber ganze Produktstrukturen durchlaufen und vorher nicht vorgeben, wie die parts und produkte heißen. Da ich noch ein relativer Newbie in Sachen Makroprogrammierung bin, würde ich mich freuen, wenn mir jmd. helfen könnte.

Danke

Ansatz:

'löschen von Parametern

Dim partDocument1 'As PartDocument
Set partDocument1 = CATIA.ActiveDocument
Set part1 = partDocument1.Part
Set parameters1 = part1.Parameters
Set selection1 = partDocument1.Selection

selection1.Search "Knowledgeware.'Set of parameters'.Name=geo'.'* + Knowledgeware.'Set Of Relations'.Name=geo'.'*;all"

For i = 1 To CATIA.ActiveDocument.Selection.Count
On Error Resume Next
CATIA.ActiveDocument.selection.delete

Next

Part1.Update

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

---

Vielleicht hilft das hier:
http://ww3.cad.de/foren/ubb/Forum137/HTML/002597.shtml

------------------
Viele Grüße
Jochen Kästle

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