Part suchen/selektieren - Dateipfad auslesen / CATIA V5 Programmierung
ARA1702 17. Nov. 2015, 15:57

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

joehz 17. Nov. 2015, 18:22

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

ARA1702 18. Nov. 2015, 07:35

Hi Joe,

vielen Dank, hat geklappt :-)

Grüße ARA