---

Hallo zusammen,

ich habe folgendes Problem, ich möchte in einem GeoSets explicit Geometrien oder Parameter ansprechen.

GeoSet
-Parameter
-Intersection
-Intersection2
-Plane
-Plane2

Gibt es eine Möglichkeit wie ich über Item nur den Parameter anspreche der sich in dem Geoset befindet?

Wenn ich das folgendermaßen löse:

Code:

---

Dim parameters1 As Parameters
Set parameters1 = part1.Parameters
Dim Parameter as Object
Set Parameter = parameters1.Item("Benennung der Parameter im GeoSet")

---

damit habe ich das Problem, dass vom oberem Knoten im Strukturbaum nach unten nach dem Parameter gesucht wird. Gibt es beispielweise unter Parameter den Parameter mit der Benennung("Benennung der Parameter im GeoSet") wird der obere Parameter geändert.

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

---

Servus

Ich hab drei Ideen dazu:

1. Pfad zusammenstellen:

   Code:

   ---

   Set MyParamter= parameters1.Item("Part1\Geometrisches Set.1\Test")

   ---

2. GeoSet selektieren und darin suchen

3. Mit Sublist auf die Parameter des GeoSet zugreifen:

   Code:

   ---

   Set MyParameters = parameters1.sublist(hybridBody1, false)

   Set MyParameter = MyParameters.Item("Test")

   ---

Gruß
Bernd

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

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

---

sehr gut, vielen Dank Bernd

Zitat:

---

Original erstellt von bgrittmann:

Mit Sublist auf die Parameter des GeoSet zugreifen:

Code:

---

Set MyParameters = parameters1.sublist(hybridBody1, false)

Set MyParameter = MyParameters.Item("Test")

---

---

wenn ich die Intersection ansprechen möchte, was muss ich statt MyParameters eingeben?

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

---

Servus

Wie wäre es wenn du mal die HybridShapes-Collection im GeoSet ansprichst?
Verwende bitte im VBA-Editor das Watch/Local-Fenster dazu, die Struktur der Objekte zu analysieren (oder in die Doku schauen)

Gruß
Bernd

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

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