Get Name Of Derived Part Using Inventor VBA Macro

[isocam]

Can anybody help???

Does anybody know how to display the filename of a derived part using a Inventor VBA macro?

Just for test, I have created a part and called it "Part-1.ipt". I have then created a new part called "Part-2.ipt" and inserted the derived part (part-1.ipt) into it.

I need a macro that, for testing purposes only, shows the filename of the derived part that I inserted into Part-2.ipt.

Many thanks in advance!!!

Darren

[bradeneuropeArthur]

Hi.

Take a look in one of my ideas in the signature. About derived parts, and if you like it vote it.

Also I have a sample. I can help you with it earliest Monday.

Regards,

Autodesk Software: Inventor Professional 2018 | Vault Professional 2018 | Autocad Mechanical 2018
Programming Skills: Vba | Vb.net (Add ins Vault / Inventor, Applications) | I-logic
Dimension Component! | Partlist Export! | Derive I-properties! | Vault Prompts Via API! | Vault Handbook/Manual!
Drawing Toggle Sheets! | Vault Defer Update!

! For administrative reasons, please mark a "Solution as solved" when the issue is solved !

[dgreatice]

Public Sub GetNameDerivedPart()
Dim oApp As Application
Dim oPD As PartDocument
Dim oPCD As PartComponentDefinition
Dim oDerPart As DerivedPartComponent

Set oApp = ThisApplication
Set oPD = oApp.ActiveDocument
Set oPCD = oPD.ComponentDefinition

For Each oDerPart In oPCD.ReferenceComponents.DerivedPartComponents
MsgBox (oDerPart.Name)
Next
End Sub