AnsweredAssumed Answered

Export BOM - Get Summary Information Properties "Part Type"

Question asked by Darren Smith on Jan 31, 2015
Latest reply on Jan 31, 2015 by Darren Smith

Can anybody help????

 

I have an assembly that I am exporting via a VBA macro. Below is part of the macro (see attached for full macro). The macro works OK except, I need to get the property from the summary information (Please see the attached picture)

 

Function TraverseFeatureFeatures(swFeat As SldWorks.Feature, nLevel As Long)
    Dim swSubFeat As SldWorks.Feature

    Dim swSubSubFeat As SldWorks.Feature

    Dim swSubSubSubFeat As SldWorks.Feature

    PartNumber = ""

    While Not swFeat Is Nothing

    FeatureType = swFeat.GetTypeName

    Select Case FeatureType
      Case "Reference", "Stock"
           PartNumber = swFeat.Name

           If FeatureType = "Reference" Then PartNumber = Left$(PartNumber, InStrRev(PartNumber, "-") - 1)

           REM I NEED TO DISPLAY THE "PartType" PROPERTY HERE???? (eg Laser Cut Profile). PLEASE SEE THE ATTACHED PICTURE
    End Select

    Set swFeat = swFeat.GetNextFeature

    Wend
End Function

 

Does anybody know how to do this????

 

Thanks in advance!

 

Darren

Attachments

Outcomes