Как узнать площадь сечения при помощи скрипта (VBA в Inventor)?

[Anonymous]

Здравствуйте! 

Появилась задача узнавать площадь сечения детали с каким то шагом по длине(задается отдельно). 

Хотел бы решить эту задачу скриптом, заодно познакомиться с VBA в Inventor. 

Логика следующая : Ищем созданное сечение ( например "sliceplane"), делаем на его основе сечение с офсетом. Разделяем тело на два, ищем образованную поверхность, находим ее площадь, записываем в таблицу. 

Пока что я остановился на стадии разделить тело. Не могу найти эту фичу в Features.

Public Sub AddWorkPlaneInPart()

Dim oPartD As PartDocument
Set oPartD = ThisApplication.ActiveDocument

Dim oCDef As ComponentDefinition
Set oCDef = oPartD.ComponentDefinition

Dim oRefWPlane As WorkPlane
Set oRefWPlane = oPartD.ComponentDefinition.WorkPlanes.Item("PlaneToSlice")

Dim oWPlane As WorkPlane
Set oWPlane = oCDef.WorkPlanes.AddByPlaneAndOffset(oRefWPlane, 1)
Dim Count As Integer
Count = 5
Dim N As String
N = "SPlane" & Count
oWPlane.Name = N


End Sub

@Anonymous 

Название темы было изменено @alina.balkanskaia для улучшения навигации на форуме. Оригинальное название: Скрипт площади сечения

[lena.talkhina]

Добрый день @Anonymous !
Рада видеть вас в Сообществе Autodesk.

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