solidworks 模型转STEP宏代码

如果你喜欢我们的文章，欢迎您分享或收藏彩红网的文章！我们网站的目标是帮助每一个有求知欲的人，无论他们的水平和经验如何。我们相信，只要有热情和毅力，无论从什么时候开始学习都不晚。

solidworks 模型转STEP 宏代码
 solidworks 单个模型转STEP宏代码，保存地址默认和模型在同一目录

' ******************************************************************************
' 模型转STEP宏代码
' ******************************************************************************
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim saveSTP As Long, longwarnings As Long
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
'提取文件名+step
FileName = Part.GetPathName
FileName = Left(FileName, Len(FileName) - 6) & "STEP"
' Save As STEP
saveSTP = Part.SaveAs3(FileName, 0, 2)
End Sub

文章版权归作者所有，未经允许请勿转载。

THE END