Makro do tworzenia linii podziału

Witam.
W oprogramowaniu Solidworks Premium 2019.
Próbuję utworzyć makro, które tworzy linię podziału ze szkicu i powierzchni.
Wybieranie elementów wydaje się działać, ale polecenie utworzenia linii rozdzielającej nie daje żadnego efektu...
Oto kod:
Opcja jawna
Dim swApp jako SldWorks.SldWorks
Przyciemnij model jako ModelDoc2
Funkcja Przyciemniania Jako funkcja
Dim boolstatus As Variant
Sub main()
Ustaw swApp = Application.SldWorks
Ustaw model = swApp.ActiveDoc
'boolstatus = Model.Extension.SelectByID2(" Boss-Extrude1 ", " BODYFEATURE ", 0, 0, 0, False, 0, Nothing, swSelectOptionDefault)
boolstatus = Model.Extension.SelectByID2("  ", "  ", 0.0061, 0.0079, 0, False, 0, Nic, swSelectOptionDefault)
boolstatus = Model.Extension.SelectByID2(" Pointes_bottom ", " SZKIC ", 0, 0, 0, Prawda, 4, Nic, 0)

Model.InsertSplitLineProject True, True

Koniec subwoofera

Ostatecznie współrzędne ściany zostaną zdefiniowane przez zmienne.
Dziękuję za pomoc

Witam

Do wyboru powierzchni musimy mieć parametr wartości znaku funkcji wyboru ustawiony na 1.
Metoda InsertSplitLineProject (IModelDoc2) - 2019 - Pomoc SOLIDWORKS API
Przykład tworzenia przykładowej operacji linii podziałowej rzutowania (VBA) - 2019 - Pomoc SOLIDWORKS API

4 polubienia