swOpenDocOptions_Silent doesn't work with suppressed components

Sub ListCustomProperty(strCompRef As String, sFileNameAndPath As String, strRefCfg As String)

Dim swApp                  As SldWorks.SldWorks

Dim swIndividualItemConfig  As SldWorks.Configuration

Dim swCustPropMgr          As SldWorks.CustomPropertyManager

Dim lRetVal                As Long

Dim vPropNames              As Variant

Dim vPropTypes              As Variant

Dim vPropValues            As Variant

Dim ValOut                  As String

Dim ResolvedValOut          As String

Dim wasResolved            As Boolean

Dim resolved                As Variant

Dim nNbrProps              As Long

Dim j                      As Long

Dim custPropType            As Long

Dim swIndividualItem        As SldWorks.ModelDoc

Dim swFileError            As Long

Dim swFileWarning          As Long

'...continue building the sublist...

Open "D:\Configurator\PropertyList.txt" For Append As #1

Set swApp = Application.SldWorks

'Establish whether the item is an individual part or an subassembly and open file

If InStr(1, sFileNameAndPath, ".sldasm") = 0 And InStr(1, sFileNameAndPath, ".SLDASM") = 0 Then

    Set swIndividualItem = swApp.OpenDoc6(sFileNameAndPath, swDocPART, swOpenDocOptions_Silent, strRefCfg, swFileError, swFileWarning)

Else

    Set swIndividualItem = swApp.OpenDoc6(sFileNameAndPath, swDocASSEMBLY, swOpenDocOptions_Silent, strRefCfg, swFileError, swFileWarning)

End If