---

Huhu hab schon wieder ein kleines Prob :-)

hat schon jemand mal versucht die StrWorkbench zu laden?

Sub CATMain()

Dim mypart As part
Dim mypartdocument As Document
Dim wb As Workbench

Set mypartdocument = CATIA.ActiveDocument
Set mypart = mypartdocument.part
Set wb = mypartdocument.GetWorkbench("StrWorkbench")  'Fehler

End Sub

Funzt bei mir nicht...Ich vermute er findet die einfach nicht aber warum das so ist??? Mit "SPAWorkbench" gings ja auch

------------------
gr33t7 Ronny

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

---

Hallo Ronny,

schau mal ob der Verweis auf die entsprechende TLB vorhanden ist!

Kannst im Objekt-Viewer (F2) pruefen ob das Schluesselwort vorhanden ist.

Gruss Louis

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

---

jupp ist seitens VBA Vorhanden

Dimen usw geht ja auch nur, das initaliesieren durch holen aus dem partdocument schlägt jedesmal wegen nem Runtime Fehler fehl

------------------
gr33t7 Ronny

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

---

Hallo,
kann es sein, das StrWorkbench nur im Product funktioniert, während SPAStrWorkbench auch im Part funktioniert.

Habe mal in der Hilfe gestöbert; ist vielleicht ein Hinweis

Jens Hansen

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

---

jupp glaub so ist das...habs auch schon zum laufen gekriegt nur wusst ich halt nicht genau warum

    Set TheSPAWorkbench = oBody.Parent.Parent.Parent.GetWorkbench("SPAWorkbench")

müsste zieht das aus dem entsprechenden partdocument und damit gehts

------------------
gr33t7 Ronny

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