Вызов пользовательских справочных свойств в CATIA с использованием VBA

Question

Я хочу вызвать пользовательские свойства в CATIA. В настоящее время я могу сделать это по прямому пути, используя:

xyz = CATIA.Activedocument.product.UserRefProperties.Item("DESIGNER").Value
MsgBox (xyz),0

Я хочу обобщить, чтобы все, что пользователь выбирает в окне, отображало эту информацию. Я могу сделать что-то похожее на то, что моя цель - использовать такой код:

abc = CATIA.ActiveDocument.Selection.Item(1).Value.Name
MsgBox (abc),0

Это касается моей проблемы. Приведенный выше код будет вызывать системные свойства, основанные на выборе, однако это не будет работать с пользовательскими свойствами.

Как я могу изменить этот код, чтобы взять информацию, хранящуюся в пользовательском свойстве, и отобразить ее?

Answer 1

У вас может быть проблема из-за того, что, начиная с подструктуры уровня 2, ваш выбор не содержит ссылку, а экземпляр, попробуйте этот код (я отображаю 1-е добавленное пользователем свойство выбранного продукта)

MsgBox CATIA.ActiveDocument.Selection.Item(1).LeafProduct.ReferenceProduct.UserRefProperties.Item(1).ValueAsString