---

Hallo liebe VBA Experte,

bin ein absoluter Neuling zum Thema VBA-Programmierung. ich brauche bitte Hilfe von euch.

Die folgende Code kann nicht durchgeführt werden:

Sub Main()

'Wzk3D deklarieren
Dim Bauteil As Part
Set Bauteil = CATIA.ActiveDocument.Part
Dim Wzk3D As HybridShapeFactory
Set Wzk3D = Bauteil.HybridShapeFactory

'geöffnete Körper erzeugen
Dim HBody As HybridBody
Set HBody = Bauteil.HybridBodies.Add
HBody.Name = "Helix_Punkte"

'Punkte vordefinieren
Dim P1, P2
Set P1 = HBody.HybridShapes.Item("Punkt.1")
Set P2 = HBody.HybridShapes.Item("Punkt.2")
Dim Ref1 As Reference
Dim Ref2 As Reference
Set Ref1 = Bauteil.CreateReferenceFromObject(P1)
Set Ref2 = Bauteil.CreateReferenceFromObject(P2)
Dim Punkt As HybridShapePointBetween
Set Punkt = Wzk3D.AddNewPointBetween(Ref1, Ref2, 0.3333, 1)

'Geometrie zuweisen
HBody.AppendHybridShape Punkt

Bauteil.Update

End Sub

Wo könnte bitte das Problem liegen?

Danke im voraus für die Antwort

MFG

------------------
Jaydar
Esslingen (D)

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

---

Servus
Willkommen im Forum. Bitte Syteminfo ergänzen.
Die frage gehört eher ins Programmier-Unterforum
Was funktioniert bei Code nicht? Welche Fehlermeldung kommt? Gibt es die Punkte wie im Code definiert (bzw wie sollen die Punkte in das neu erstellte GeoSet kommen)?

Gruß
Bernd

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

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

---

Servus Bernd,

da steht Object doesnŽt support this property or method.

Nachdem Klicken von Debug sind folgende Zeile gelbmarkiert:
Set P1 = HBody.HybridShapes.Item("Punkt.1")
Set P2 = HBody.HybridShapes.Item("Punkt.2")

Gruß

------------------
Jaydar
Esslingen (D)

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

---

Servus
Ganz klar: du erzeugst ein neues GeoSet, und darin werden die Punkte gesucht, diese sind aber in einem anderen GeoSet.

Gruß
Bernd

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

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

---

Servus Bernd,

Helix_Punkte ist die erzeugte GeoSet!

Die Punkte sind doch in diese GeoSet definiert oder liegt ich falsch?

MfG
Jayden

------------------
Jaydar
Esslingen (D)

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

---

Du hast zunächst ein neues GeoSet erzeugt. Wie auch händisch in CATIA. -> Das GeoSet ist da, aber leer.

Nun willst du mit deiner Zuweisung auf Punkt.1 und Punkt.2 zugreifen, diese gibt es aber noch nicht.
Deswegen die Fehlermeldung.

------------------
Grüße aus dem Thurgau
Thomas

+++++++++++++++++++++++++++++++++

CATIA - eine Laune der Natur ...

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

---

super Thomas

Es hat geklappt

Danke euch!!!

Jayden

------------------
Jaydar
Esslingen (D)

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