---

Hallo,

ich habe folgendens Problem: ich möchte die Parameter eines Products auslesen. Mit folgendem Code bekomme ich allerdings nicht nur die Parameter des Products sondern außerdem noch alle Parameter der Products/Parts, die unter diesem Product liegen:

    Dim i As Integer
    Dim prod As Product
   
    Set prod = CATIA.ActiveDocument.Product
   
    For i = 1 To prod.Parameters.Count
        MsgBox prod.Parameters.Item(i).name
    Next

Für eine Lösung wäre ich wirklich sehr dankbar!

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

---

Hallo mgheinz1001,

ich denke Dein Fehler liegt in der Abfrage der "falschen" Parameter. Wenn Du die Parameter unter dem Knoten "Parameter" im Baum auslesen willst, sollte es

prod.Parameters.RootParameterSet.DirectParameters.Count

bzw.

prod.Parameters.RootParameterSet.DirectParameters.Item(i).name

lauten. Tiefere "Verschachtelungen" sollten dann als

prod.Parameters.RootParameterSet.ParameterSets.Item(k).DirectParameters

und so weiter auszulesen sein.

mfg,
Lusilnie

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

---

Super, es funktioniert!

Vielen Dank!

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

---

Hallo mgheinz1001,

schön, dass es funktioniert.

Kannst du mal für nen Anfänger zeigen, wie das Makro im Zusammenhang aussieht.
Aus den Bruchstücken in den obigen Beiträgen werde ich nicht schlau.

Schon mal Danke!

Gruß
Bertel

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