Hallo
Ich habe ein SolidWorks Makro, das gut funktioniert, wenn ich das SolidWorks Makro starte.
Ich möchte, dass dieses Makro über das Solidworkstask-Add-In in unseren EPDM-Feed eingebunden wird.
Hier ist mein Makro, es wird verwendet, um die Blockleiste in einer Teiledatei zu senken.
Dim swdoc As SldWorks.ModelDoc2
Dim swAllDocs As EnumDocuments2
Dimmen FirstDoc als SldWorks.ModelDoc2
Dim boolstatus als boolescher Wert
Dim NumDocsReturned As Long
DocCount so lange dimmen
Dim swapp als SldWorks.SldWorks
Dim longstatus As Long
Teil als Objekt dimmen
Unternummer FREEZE_ONE()
Setze swapp = _
Anwendung.SldWorks
Set part = swapp. ActiveDoc (Englisch)
Wenn (UCase(Right(part. GetPathName, 6)) = UCase("sldprt")) dann
boolstatus = Teilen. FeatureManager.EditFreeze(swMoveFreezeBarTo_e.swMoveFreezeBarToEnd, "", True)
Teil. SaveAs (Teil. GetPathName)
Ende, wenn
Ende Sub
Ich habe es in die Registerkarte "Skript" der Aufgabe eingefügt
Das Makro wird nicht ausgeführt.
Woher kommt das?
Wissen Sie, wie es geht?
Vielen Dank im Voraus für Ihr Feedback
Yannick
2020_03_04_22_10_03_nouvelle_tache_proprietes.png