Supress if no effect

[ASchlaack]

Is there a rule to supress a feature (a cut) if it has no effect?

[rjay75 · Accepted solution]

Here's a way to check for specific features

Call by findSickFeaturesByName(doc, New String() { "extrusion3", "extrusion4" })

Public Sub findSickFeaturesByName(doc As PartDocument, names As String())

Dim feature As PartFeature
Dim features As Features


features = doc.ComponentDefinition.Features

For Each feature In features
    If names.Contains(feature.Name) And feature.HealthStatus <> kUpToDateHealth And feature.HealthStatus <> kSuppressedHealth Then
        MsgBox("There's a problem with one of the features. Check your parameters. Problem feature: " & feature.Name, vbOKOnly, "UnHealthy Feature Detected!")
        Exit Sub
    End If
Next

End Sub

[ASchlaack]

You're the man! that's the code I needed! Thanks for all your time.