AnsweredAssumed Answered

Get "Custom Property" values using a VBA macro

Question asked by Darren Smith on Apr 17, 2013
Latest reply on Apr 23, 2019 by Christian Chu

Can anybody help?


I have the following VBA macro....


Dim swApp As Object


Sub Main()
    Set swApp = Application.SldWorks

    Set swModel = swApp.ActiveDoc

    vConfName = swModel.GetConfigurationNames

    For i = 0 To UBound(vConfName)
        Set swConfig = swModel.GetConfigurationByName(vConfName(i))
        nNumProp = swConfig.GetCustomProperties(vPropName, vPropValue, vPropType)

        MsgBox "  Config       = " & vConfName(0)

        For j = 0 To nNumProp - 1
            MsgBox vPropName(j) & " = " & vPropValue(j)
        Next j
    Next i
End Sub


The above macro displays the values in the "Configuration Specific" tab.


How do I change the above macro to display the values in the "Custom" tab?


Many thanks in advance!!!!!