Hello fella's,

Im working on a macro that set the suppression and dimensions ofparts within an assembly. It pics a part in an assembly and,depending on various external parameters decides what dimensions itshould have.

At the moment my code looks like this :

'Unsuppress paneel 12
boolstatus =ModelDoc2.Extension.SelectByID2("vloer-1@Koelcel/paneel12Ori-1@vloer", "COMPONENT", 0, 0, 0, False, 0, Nothing, 0)
ModelDoc2.EditUnsuppress2

'Set breedte paneel 12
boolstatus =ModelDoc2.Extension.SelectByID2("br@Sketch1@vloer-1@Koelcel/paneel12Ori-1@vloer", "DIMENSION", -0.4750047837849, -0.6522639427834,-1.242181926758, False, 0, Nothing, 0)
Set myDimension = ModelDoc2.Parameter("br@Sketch1@paneel12Ori.Part")
myDimension.SystemValue = (le / 2) / 1000

'Set lengte paneel 12
boolstatus =ModelDoc2.Extension.SelectByID2("le@Sketch1@vloer-1@Koelcel/paneel12Ori-1@vloer", "DIMENSION", -1.920808685221, 0.3246203723679,-0.1293965163067, False, 0, Nothing, 0)
Set myDimension = ModelDoc2.Parameter("le@Sketch1@paneel12Ori.Part")
myDimension.SystemValue = (br / 1000)

What this does (maybe not the best way of selecting my parts, butthe only way i know of) is unsuppress a part, and basically setsits width and lenght .

what i'd like to do is set a (allready existing) custom property(overide the value) on the selected/current part. (Thus beeing ableto pass on a value relevant to the givin' dimensions)

Big thanks for good advice in advance !!

BertSolidworksApi macros