Question sur Part.SelectedFeatureProperties

Out of category
1

boolstatus = Part.Extension.SelectByID2("Verwijderde mat.-Extru.4", "BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0)
boolstatus = Part.SelectedFeatureProperties(0, 0, 0, 0, 0, 0, 0, True , True, "Verwijderde mat.-Extru.4")

Hallo, ik wil graag een functie op mijn stuk activeren of deactiveren, zodat ik speel met de Waar of Onwaar 

Maar geldt dit automatisch voor al mijn configuraties?  

Ik ben hier gaan kijken :http://help.solidworks.com/2017/english/api/sldworksapi/solidworks.interop.sldworks~solidworks.interop.sldworks.imodeldoc~selectedfeatureproperties.html hier 

Maar dat helpt me niet. 

Heb jij het antwoord??  

2

Probeer het volgende:

 

Option Explicit
Dim swApp As SldWorks.SldWorks
Dim Part As SldWorks.ModelDoc2
Dim boolstatus As Boolean
Dim configNames() As String
Dim configName As Variant
Sub main()
    Set swApp = Application.SldWorks
    Set Part = swApp.ActiveDoc
    configNames = Part.GetConfigurationNames
    For Each configName In configNames
        boolstatus = Part.ShowConfiguration2(configName)
        boolstatus = Part.Extension.SelectByID2("Enlèv. mat.-Extru.4", "BODYFEATURE", 0, 0, 0, False, 0, Nothing, 0)
        boolstatus = Part.EditSuppress2()
        ' ou:
        'boolstatus = Part.EditUnsuppress2()
    Next
End Sub