iCAx开思网

标题: 求助 需要做一个 保存功能 [打印本页]

作者: makejon    时间: 2019-6-16 06:54
标题: 求助 需要做一个 保存功能
1.保存功能的宏---相当于就是实现软件之身的功能

1.工程图保存
2.零件图保存

我是想把这个命令功能放在另外一个宏里面。录制的宏,点了实现不了保存功能,求助各位大佬,帮帮忙。。

作者: qiminger    时间: 2019-6-16 08:09
把你录制宏中的代码删掉,粘贴下面代码
  1. Dim swApp As Object
  2. Dim Part As Object

  3. Sub main()
  4. Set swApp = _
  5. Application.SldWorks
  6. Set Part = swApp.ActiveDoc
  7. Part.Save'保存文件
  8. End Sub
复制代码


作者: makejon    时间: 2019-6-18 09:05
谢谢!!!问题解决了~




欢迎光临 iCAx开思网 (https://www.icax.org/) Powered by Discuz! X3.3