any ideas about this? i was trying withswComponent.IsPatternInstance but this functions says if acomponent is inside a pattern not if a component is a pattern. andi want the second one...
thank you!

i want to do something like this:

If swComponent.IsPatternInstance Then
type = "COMPPATTERN"
Else
type = "BODYFEATURE"
End If

i have tried also with:
Dim c As SldWorks.ModelDoc2
Dim z As Long
Set c = swComponent.GetModelDoc
z = swmodel.GetType
MsgBox z

If z = 2 Then
type= "COMPPATTERN"
Else
type = "BODYFEATURE"
End If

but z=2 if both cases.SolidworksApi macros