Question sur Part.SelectedFeatureProperties

Out of category
1

boolstatus = Part.Extension.SelectByID2("Entfernt mat.-Extru.4", "BODYFEATURE", 0, 0, 0, Falsch, 0, Nichts, 0)
boolstatus = Part.SelectedFeatureProperties(0, 0, 0, 0, 0, 0, 0, 0, True , True, "Entfernte Matte-Extru.4")

Hallo, ich möchte eine Funktion auf meinem Stück aktivieren oder deaktivieren, also spiele ich mit dem Wahr oder Falsch 

Aber gilt das automatisch für alle meine Konfigurationen  ?

Ich habe hier nachgesehen :http://help.solidworks.com/2017/english/api/sldworksapi/solidworks.interop.sldworks~solidworks.interop.sldworks.imodeldoc~selectedfeatureproperties.html hier 

Aber das hilft mir nicht. 

Haben Sie die Antwort?  

2

Versuchen Sie Folgendes:

 

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