Determining ipt file type

[isocam]

Can anybody help?

Is it possible, using Inventors VBA to determine if a "ipt" file is a "Normal File" or a "Sheet Metal File".

Say I have created a sheet metal component and a normal component.

If i run a VBA macro, can I tell which one is the "Sheet Metal" component?

Many thanks in advance!!!

[TONELLAL]

In the properties, you can use the Sub file type.

[Anonymous · Accepted solution]

Public Sub PartTest()
    Dim oPartDoc As PartDocument
    Set oPartDoc = ThisApplication.ActiveDocument
    If oPartDoc.ComponentDefinition.Type = kPartComponentDefinitionObject Then
        MsgBox ("Standard part")

    ElseIf oPartDoc.ComponentDefinition.Type = kSheetMetalComponentDefinitionObject Then
        MsgBox ("SheetMetal")
    End If
End Sub