Determine if drawing is from part or sheetmetal

[Rob67ert]

Hi,

I like to determine with iLogic if the drawing of an .ipt is from a part or a sheetmetal.

How can i do that?

[Owner2229 · Accepted solution]

Hey, here you go:

' Define the open document
Dim aDoc As Document = ThisApplication.ActiveDocument
If aDoc Is Nothing Then Exit Sub
' Look at all of the files referenced in the open document
For Each oDoc As Inventor.Document In aDoc.AllReferencedDocuments
	Dim FName As String = oDoc.FullFileName
	If oDoc.DocumentSubType.DocumentSubTypeID = "{9C464203-9BAE-11D3-8BAD-0060B0CE6BB4}" Then
		MsgBox(FName & vbnewline & "is a sheetmetal part.")
	ElseIf oDoc.DocumentType = DocumentTypeEnum.kPartDocumentObject Then
		MsgBox(FName & vbnewline & "is a normal part.")
	End If
Next

[Rob67ert]

@Owner2229 Thanks 🙂

[Owner2229]

You're welcomed.