Hallo,
kann man mit diser Schleife an den
kompletten Pfad des Bauteils kommen (FullFilename)
bzw. wie kommt man mit dieser Scheife an
kompletten Pfad des Bauteils
#######################################################
Sub test()
Dim oDoc As Inventor.AssemblyDocument
Set oDoc = ThisApplication.ActiveDocument
Dim oCompDef As Inventor.ComponentDefinition
Set oCompDef = oDoc.ComponentDefinition
Dim oCompOcc As ComponentOccurrence
For Each oCompOcc In oCompDef.Occurrences
Msgbox oCompOcc.Name
'oCompOcc.FullFileName 'klappt nicht
Next
End Sub
###################################################
MFG
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP