Hallo
Ik heb een solidworks-macro die prima werkt als ik de solidworks-macro start.
Ik wil graag dat deze macro wordt aangesloten op onze EPDM-feed via de Solidworkstask-invoegtoepassing.
Hier is mijn macro, deze wordt gebruikt om de blokbalk op een onderdeelbestand te verlagen.
Dim swdoc als SldWorks.ModelDoc2
Dim swAllDocs als EnumDocuments2
Dim FirstDoc als SldWorks.ModelDoc2
Dim boolstatus als Booleaanse
Dim NumDocsKeerde zo lang terug
Dim DocCount zo lang
Dim swapp als SldWorks.SldWorks
Dim longstatus Zo lang
Deel dimmen als object
Sub FREEZE_ONE()
Stel swapp in = _
Toepassing.SldWorks
Onderdeel instellen = swapp. ActiveDoc
Als (UCase(Right(part. GetPathName, 6)) = UCase("sldprt")) dan
boolstatus = delen. FeatureManager.EditFreeze(swMoveFreezeBarTo_e.swMoveFreezeBarToEnd, "", waar)
deel. SaveAs (deel. GetPathName)
Einde als
Einde Sub
Ik heb het in het scripttabblad van de taak geplakt
De macro wordt niet uitgevoerd.
Waar kan dit vandaan komen?
Weet jij hoe je het moet doen?
Alvast bedankt voor uw feedback
Yannick
2020_03_04_22_10_03_nouvelle_tache_proprietes.png