mirror derived part

[dwillmschen]

Set test = ThisApplication.ActiveDocument.ComponentDefinitions.Item(1).ReferenceComponents.DerivedPartComponents.Item(1).Definition
test.mirrorplane= kDerivedPartMirrorPlaneXY

this seams like a simple thing but i cant get it for the life of me.

im trying to mirror a derived part . when i run this the watch says its mirrored but the part doesn’t change

ive learned how to do it when creating a part but nothing on modifying an existing part

[dwillmschen]

Finally got it

Sub IncludeParameterForDerivedPart()
    Dim oDoc As PartDocument
    Set oDoc = ThisApplication.ActiveDocument
   
    Dim oDerivedPartDef As DerivedPartDefinition
    Set oDerivedPartDef = oDoc.ComponentDefinition.ReferenceComponents.DerivedPartComponents(1).Definition
    

    oDerivedPartDef.MirrorPlane = kDerivedPartMirrorPlaneXY
    oDoc.ComponentDefinition.ReferenceComponents.DerivedPartComponents(1).Definition = oDerivedPartDef
End Sub