Status property to VBA

[J.Classens]

Hello,

In a VBA solution i need to get the State property to  set it in a formule.

The problem is that this property isn't present in the propertydesign sets.

https://knowledge.autodesk.com/search-result/caas/simplecontent/content/list-all-iproperties-and-how...

Is there a possibilty to acces this property?

I want to set it to a custom name like the code beneath here. 

Set oPartStatus = oCompDef.Document.PropertySets _
.Item("Design Tracking Properties").Item("Design Status")

[JhoelForshav · Accepted solution]

Hi @J.Classens 

The property name is "User Status" and it's located in "Design Tracking Properties"

See example below to set the value of this property with VBA:

Sub SetStatus()
Dim oDoc As Document
Set oDoc = ThisApplication.ActiveDocument
Dim oStatusProp As Inventor.Property
Set oStatusProp = oDoc.PropertySets("Design Tracking Properties")("User Status")
oStatusProp.Value = "My value" 'Set value of status
End Sub