我有一个以不同方式配置SolidWorks零件的MS Access VBA脚本。
升级到Windows 10和SolidWorks 2016后，它不再起作用。
我的代码是：
Set swApp = CreateObject("SldWorks.Application")
Set part = swApp.activeDoc
bRet = swApp.SaveAs4(Savename, swSaveAsCurrentVersion, swSaveAsOptions_Copy, nErrors, nWarnings)
其中Savename是“ C：\ test-part.SLDPRT”
它停在 SwApp.SaveAs4
我收到运行时错误“ 438”。“对象不支持此属性或方法”。
我已经尝试过Save，SaveAs2等，但是同样的错误。
我现在还找不到任何东西。
有什么建议？
BR，埃米尔。
尝试：
bRet = part.SaveAs4(Savename, swSaveAsCurrentVersion, swSaveAsOptions_Copy, nErrors, nWarnings)
您需要保存零件，而不是应用程序。
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句