Tworzenie punktu w funkcji "wspomaganie wiercenia"

Macro
1

Cze wszystkim

Moim celem jest stworzenie makra, które usunie punkt wstawienia mojego otworu, a następnie doda go w danej pozycji. Mam jednak pewien problem, funkcja " createpoint " umieszcza punkt na żądanych współrzędnych, ale nie dołącza punktu do przebitej powierzchni (mimo że podaje podane współrzędne). Więc moje wiercenie nie jest wykonywane, ponieważ nie znajduje powiązanej powierzchni.

Czy ktoś kiedykolwiek manipulował tą funkcją?

Dziękuję.

2

Podaj przykład, będzie prościej

W domu to działa

Sub main()
Dim swApp As Object
Dim Part As Object
Dim myModelView As Object
Dim skPoint As Object

Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Set myModelView = Part.ActiveView

Set skPoint = Part.SketchManager.CreatePoint(0, 0, 0#)
Part.SetPickMode
Part.ClearSelection2 True
End Sub
2 polubienia
3

Point sur plan
Point sur plan1075×541 23.7 KB

W rzeczywistości to nie funkcja tworzenia punktów nie działa, ale raczej to, że utworzony punkt nie pasuje do funkcji

4

Punkt tworzony w tym miejscu jest mylony z planem, ale nie " na płaszczyźnie ", jak pozwoliłoby mi na to ograniczenie, ale ręcznie

5

pytanie brzmi zatem, czy możliwe jest utworzenie punktu (który znajduje się na szkicu 3D) bezpośrednio z ograniczeniem " na płaszczyźnie "?

6

Zapoznaj się z interfejsem API, aby dowiedzieć się, jak pobrać i dodać punkt w tej funkcji.
Jeśli się nie mylę, powinno ci to pomóc:
https://help.solidworks.com/2022/English/api/sldworksapi/Get_Sketch_Points_in_Wizard_Hole_Example_VB.htm