Solidworks 2016 SaveAs Access VBA运行时错误438
Posted
技术标签:
【中文标题】Solidworks 2016 SaveAs Access VBA运行时错误438【英文标题】:Solidworks 2016 SaveAs Access VBA Run-time error 438 【发布时间】:2016-08-10 15:28:01 【问题描述】:我有一个以不同方式配置 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,埃米尔。
【问题讨论】:
【参考方案1】:试试:
bRet = part.SaveAs4(Savename, swSaveAsCurrentVersion, swSaveAsOptions_Copy, nErrors, nWarnings)
您需要保存零件,而不是应用程序。
【讨论】:
以上是关于Solidworks 2016 SaveAs Access VBA运行时错误438的主要内容,如果未能解决你的问题,请参考以下文章