---

Hallo Zusammen,

ich möchte gerne aus einem Produkt ein Part suchen/selektieren und den Dateipfad des Parts auslesen. Den Namen des Parts konnte ich schon auslesen, den Dateipfad leider noch nicht.

Kann mir hier Jemand weiter helfen?

So sieht meine Produktstruktur aus:

Produkt
|
|- Part1
|- Part2
...

So konnte ich den Namen auslesen:

Dim Partsearch As Selection
Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument

Set Partsearch = CATIA.ActiveDocument.Selection
Partsearch.Search "name=" & "(Bauteilnummer Part)" & "*;all"

MsgBox (Partsearch.Item(1).Value.Name)    '.FullName funktioniert hier leider nicht.

Vielen Dank schon mal

ARA

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

---

Hi ARA,

Probier mal:

Code:

---

MsgBox (Partsearch.Item(1).Value.ReferenceProduct.Parent.FullName)

---

Wenn Du den Namen aber schon kennst, kannst auch so vorgehen:

Code:

---

Sub Catmain()
  Dim oAD As ProductDocument
  Dim oADP As Product
  Dim strPName As String

  strPName = "G000198__xxxx__Boden_kurz_breit.1"
  Set oAD = CATIA.ActiveDocument
  Set oADP = oAD.Product.Products.Item(strPName)

  MsgBox oADP.ReferenceProduct.Parent.FullName
End Sub

---

Tschau,
Joe

------------------
Inoffizielle Catia Hilfeseite

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

---

Hi Joe,

vielen Dank, hat geklappt :-)

Grüße ARA

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