---

Hallo,

ich möchte eine User Selection erstellen. Hab das auch schon mehrmals gemacht und meinen Code für diese Funktion aus einem anderen Modul rauskopiert, wo er einwandfrei funktioniert. Im aktuellen Makro läuft er aber nicht. Wo liegt der Fehler???

Code:

---

Dim Selection As Selection
Set Selection = CATIA.ActiveDocument.Selection
Selection.Clear

Dim F
Dim Was(0)
Was(0) = "HybridShapeSurfaceExplicit"

F = Selection.SelectElement2(Was, "test", False)

---

Der Debugger markiert mir "SelectElement2" und meint "Function marked as restricted or automation type not supportet".

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

---

Servus
Definiere einfach die Selection als Objekt (sie auch hier)

Gruß
Bernd

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

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

---

Hallo 

Deine Selektion Name ist falsch.

Code:

---

Dim osel As Selection
Set osel  = CATIA.ActiveDocument.Selection
osel.Clear

Dim F
Dim Was(0)
Was(0) = "HybridShapeSurfaceExplicit"

F = osel.SelectElement2(Was, "test", False)

---

------------------
Mit freundlichen Grüßen,
JuPaV

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