---

Moin!

Ich habe mehrere Ebenen in einem Geometrischen Set "Ebenen".
Meine For-Schleife soll einen Zähler von I=1 bis Anzahl der Ebenen erhalten.Die Ebenen ("Plane.1" bis "Plane.I")sollen als Referenz für einen weiteren Schritt deklariert werden.
Habs auf diese Weise probiert, hat aber leider net geklappt 

Code:

---

For I=1 To GSEbenen.HybridShapes.Item.Count

Set RefPln = GSEbenen.HybridShapes.Item("Plane." & I)

Operation (RefX, RefPln)
...
Next

---

PS: Habs auch anstatt mit "HybridShapes" mit "Planes" probiert...

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

---

Hallo,
ich würde es wohl eher mit for each "Plane" in "Planecontainer" abwickeln.

------------------
MFG
Rick Schulz
      Nettiquette (CAD.de)  -  Was ist die Systeminfo?  -  Wie man Fragen richtig stellt.  -  Unities

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

---

Liegen im GSEbenen nur die Planes mit denen du arbeiten willst?

Dann könntest du diese auch direkt über RefPlane=GSEbenen.HybridShapes.Item(i) ansprechen.

Ansonsten hilft es oft sich den erwarteten Namen vorher zusammen zu basteln und später in der deklaration zu nutzen.
Etwa so:

Dim WorkingName as String
Workingname="Plane."&i
RefPlane=GSEbenen.hybridShapes.Item(WorkingName)

Oder man machts so wie Rick es schrieb.

EDIT: Grml, Fehlerteufelchen

[Diese Nachricht wurde von Starbirth am 07. Dez. 2010 editiert.]

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

---

"Planecontainer"??? Die Funktion sagt mir nix.
Kannst du das vllt bitte anhand eines bsp. bzw. syntax konkretisieren?

@starbirth: ja so war ja auch mein ansatz, auf die einzelnen Elemente mittels des namens zu greifen (siehe Code oben)
aber deine idee sich vorher einen "workingname" zu deklarieren gefällt mir auch ganz gut!

Mein Fehler tritt jedoch schon bei der Deklaration des Zählers für die Schleife auf.
D.h. die Syntax für den Endwert muss falsch sein!?

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

---

Oh ja, hast Recht. Hab ich nicht drauf geachtet.
GSEbenen.HybridShapes.Count statt GSEbenen.HybridShapes.Item.Count

Mit Planecontainer mein Rick vermutlich das geoSet in dem die Ebenen liegen.

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

---

...in deinem Fall könnte es so aussehen.

Code:

---

For each RefPln in GSEbenen
Operation (RefX, RefPln)
...
Next

---

Mit dem bisschen Code kann man dir aber nur schlecht helfen.

------------------
MFG
Rick Schulz
      Nettiquette (CAD.de)  -  Was ist die Systeminfo?  -  Wie man Fragen richtig stellt.  -  Unities

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

---

Danke euch beiden!

Der Fehler lag wie schon vermutet an der Syntax des schleifen-Endwerts.

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