DMUｽﾍﾟｰｽｱﾅﾘｼｽのｾｯｼｮﾝ

「DMUｽﾍﾟｰｽｱﾅﾘｼｽのｾｯｼｮﾝを利用して、多くの断面を取得したい」
と御相談を頂きました。
が、当方にはDMUｽﾍﾟｰｽｱﾅﾘｼｽのﾗｲｾﾝｽが無い為、手も足も出ないのが
本音なのですが、過去にこちらを試した事があったため
出来る限りのことは記載しておきます。
技術的なｵﾌﾞｼﾞｪｸﾄ？1 - C#ATIA

こんな感じのコードを作りました。

'vba
'DMUｽﾍﾟｰｽｱﾅﾘｼｽのｾｯｼｮﾝのﾃｽﾄ

Sub CATMain()
    'ﾌﾟﾛﾀﾞｸﾄ
    Dim Prod As Product
    Set Prod = CATIA.ActiveDocument.Product
    
    'ｾｸｼｮﾝｺﾚｸｼｮﾝ
    Dim Sects As Object 'Sections
    Set Sects = Prod.GetTechnologicalObject("Sections")
    
    'ｾｸｼｮﾝ追加
    Call Sects.Add
    Dim Sect As Object 'Section
    Set Sect = Sects.Item(Sects.Count)
    
    'ﾓｰﾄﾞ変更
    '0-catSectionBehaviorManual
    '1-catSectionBehaviorAutomatic
    '2-catSectionBehaviorFreeze
    Sect.Behavior = 1
    
    '0-without clipping  1-clipping
    Sect.CutMode = 1
    
    'ﾏﾄﾘｯｸｽ
    Dim Mat(11) As Variant ' Double
    Call Sect.GetPosition(Mat)
    
    Stop
    
    'ﾏﾄﾘｯｸｽ変更
    Mat(11) = Mat(11) + 1#
    Call Sect.SetPosition(Mat)

    'ｴｸｽﾎﾟｰﾄ
    '何処に何をｴｸｽﾎﾟｰﾄしているのか不明
    'Call Sec.Export

    Stop
End Sub

このﾏｸﾛを実行すると、ﾗｲｾﾝｽが無いにも関わらずTree部分に
ｾｸｼｮﾝが残ります。（使い道は無いのですが）

Exportが全くの謎で、ﾗｲｾﾝｽがあれば可能だと思うのですが
手動操作も良くわかっていないため、この辺が限界です。

SetPositionで断面位置調節し、Exportをｼﾞｬﾝｼﾞｬﾝ行えば良いの
だろうとは思うのですが･･･。