I've got a macro that I'm writting where a user selects a component that is contained within a subassembly.  If the selected component is contained within a pattern within the subassembly, I need to select the "seed" component of that pattern.  Here's my relevant code:

...

    Set swSelComp = swSelMgr.GetSelectedObjectsComponent3(1, -1)

...

    If swSelComp.IsPatternInstance Then
        Set JoistPatternFeature = FloorAssmDoc.FeatureByName("Joist Pattern")
        Set JoistPaternFeatData = JoistPatternFeature.GetDefinition
        SeedArray = JoistPaternFeatData.IGetSeedComponentArray
        MsgBox "A Seed Component was selected."
        Exit Sub
    Else
        Set JoistPartComp = swSelComp
        MsgBox "The root component was selected."
        Exit Sub
    End If

...

However, swSelComp.IsPatternInstance always evaluates as false.  Any idea what I'm doing wrong?

Thanks,

Doug