Как преобразовать в вариант компонент сборки?

[lavgirb]

Есть сборка с компонентами.
Первое исполнение сборки содержит зависимый вариант "Вариант сборки 1".
Один из компонентов сборки может быть представлен в двух вариантах:
- "По умолчанию"$
- "Вариант компонента 1"

Задача. В варианте сборки должен быть вариант компонента.

Делаю текущим вариант сборки "Вариант сборки 1".
С помощью

Код Выделить Развернуть

ConnectedWithInitialEmbodimentотменяю связь компонента и делаю его независимым для преобразования в "Вариант компонента 1".
Это все работает.

Не понимаю, как теперь преобразовать компонент в "Вариант компонента 1".

Пробовал так, не получается.

Код Выделить Развернуть

Set oEmbMgr = oPart7
oEmbMgr.SetCurrentEmbodiment "Вариант компонента 1"
Здесь oPart7 - компонент сборки

Не удается программно выполнить эту команду




Спасибо.

[lavgirb]

Заработало 

Код Выделить Развернуть

Set oModelObj1 = oPart7
oModelObj1.ConnectedWithInitialEmbodiment = True '!!! Отмена связи через True
oPart7.Update
Set oEmbMgr = oPart7
oEmbMgr.SetCurrentEmbodiment(THICK_BY_PADS)
oPart7.Update