ILogic Copy Model Properties/ update styles

[cotteraj]

I am looking to create a rule that selects revision number and part number within document setting/drawing/copy model properties. I have found something that does work but it does not check the boxes, which I do need for if the drawing was to be revised again. The rule I have created does copy them from the model but it doesn't check the boxes. Sorry if this is a rather simple thing my knowledge of Ilogic is small. 

Dim oPropList As ArrayList = New ArrayList()

oPropList.Add("PART NUMBER")
oPropList.Add("REVISION NUMBER")

sel_iProperty = InputListBox("CHOOSE iPROPERTY FROM ABOVE LIST", oPropList, oPropList.Item(0), "iPROPERTY SELECTION", "LIST OF iPROPERTY")

oRefDoc = ThisDrawing.ModelDocument
Dim oPropValue As String 

Select Case sel_iProperty 
	
Case "PART NUMBER"	 
	oPropValue = oRefDoc.PropertySets("Design Tracking Properties").Item("Part Number").Value 
	iProperties.Value("Project", "Part Number") = oPropValue
	MessageBox.Show(sel_iProperty + " iProperty updated successfully with value : " + oPropValue, "iProperty")

Case "REVISION NUMBER"	 
	oPropValue = oRefDoc.PropertySets("Summary Information").Item("Revision Number").Value 
	iProperties.Value("Summary", "Revision Number") = oPropValue
	MessageBox.Show(sel_iProperty + " iProperty updated successfully with value : " + oPropValue, "iProperty")
	
End Select

[JhoelForshav]

Hi @cotteraj 

Unfortunately there's no API support to check these boxes by code.