SolidWorks机械工程师网——最大的SolidWorks学习平台

标题: 大佬们，请帮忙加一个平板型式宏输出带草图输出！ [打印本页]
作者: yni621    时间: 2020-12-4 15:16
标题: 大佬们，请帮忙加一个平板型式宏输出带草图输出！
这个宏在论坛里面找的，我自己看懂一点，输出名添加了后缀平板型式。由于最近出下料图，经常要添加草图线辅助激光打标，方便焊接的时候对线，但是用宏转出来只能带折弯线。请大佬抽空帮忙加一个命令，可以顺带输出草图，非常感激。
  1. Dim swApp As Object
  2. Dim swModel As Object
  3. Dim swModelName As String
  4. Dim FilePath As String
  5. Dim value As Boolean
  6. Sub main()
  7. Set swApp = Application.SldWorks
  8. Set swModel = swApp.ActiveDoc
  9. swModelName = swModel.GetPathName '读取当前SW模型文档名(含路径)
  10. FilePath = Left(swModelName, Len(swModelName) - 7) + " 平板型式.dwg" '定义工程图名
  11. value = swModel.ExportFlatPatternView(FilePath, swExportFlatPatternOption_None) ' 保留折弯线
  12. 'value = swModel.ExportFlatPatternView(FilePath, swExportFlatPatternOption_RemoveBends) 无折弯线
  13. End Sub
复制代码



作者: Allate    时间: 2020-12-7 10:44
完全不知道你说的是什么草图，能举例说明？
作者: wuw1982    时间: 2020-12-7 16:13
顶一下，坐等高手！
作者: yni621    时间: 2020-12-8 13:36
Allate 发表于 2020-12-7 10:44
完全不知道你说的是什么草图，能举例说明？

直接输出平板型式，有个草图转出的。
作者: Allate    时间: 2020-12-8 15:35
看看行不行，我也是按API来改，没做过测试。 零件转DWG（带折弯线和草图）.zip (7.58 KB, 下载次数: 256, 售价: 5 金币)
作者: yni621    时间: 2020-12-9 11:33
Allate 发表于 2020-12-8 15:35
看看行不行，我也是按API来改，没做过测试。

2020版本测试通过，版主厉害！
作者: yni621    时间: 2020-12-10 09:58
Allate 发表于 2020-12-8 15:35
看看行不行，我也是按API来改，没做过测试。

版主大神，这个宏很有帮助，提高了工作效率，能不能帮我把草图的线改成折弯线一样是虚线？我改了线型是虚线，显示还是实线，如果没办法也就算了。非常感谢。
作者: Allate    时间: 2020-12-10 10:07
yni621 发表于 2020-12-10 09:58
版主大神，这个宏很有帮助，提高了工作效率，能不能帮我把草图的线改成折弯线一样是虚线？我改了线型是虚 ...

其实我一般也没用到草图这个功能的，不好作判断。要不这样，你发一个零件出来，我研究一下。
作者: yni621    时间: 2020-12-10 11:56
Allate 发表于 2020-12-10 10:07
其实我一般也没用到草图这个功能的，不好作判断。要不这样，你发一个零件出来，我研究一下。

SB-BJ-A002 角立板 T1.5.SLDPRT (1.56 MB, 下载次数: 190)
草图是上激光机打标用，
主要是辅助折弯，压到对线就可以折圆弧。
还有一种是辅助焊接定位用。
麻烦大神了，有空就看看，实在不行，也感谢你的帮忙。

作者: Allate    时间: 2020-12-10 13:52
yni621 发表于 2020-12-10 11:56
草图是上激光机打标用，
主要是辅助折弯，压到对线就可以折圆弧。
还有一种是辅助焊接定位用。

尴尬，我只有SW2019...不过大概知道是怎么回事了，不用另外再发。
这个草图暂时想不到在SW宏里面怎么解决，不过倒是可以在CAD那里下手，搞个CAD的二次命令就好。
作者: yni621    时间: 2020-12-10 16:22
Allate 发表于 2020-12-10 13:52
尴尬，我只有SW2019...不过大概知道是怎么回事了，不用另外再发。
这个草图暂时想不到在SW宏里面怎么解 ...

好的，没关系，现在的也 挺好用了，还是谢谢你。
作者: Allate    时间: 2020-12-11 11:04
说好的CAD二次命令，请查收。（注：这个是用LISP来写的，具体怎么用参考这里）
命令：FIX_SKETCH（这个可以自行改名字）

FIX_SKETCH.zip (445 Bytes, 下载次数: 137, 售价: 5 金币)
作者: yni621    时间: 2020-12-11 13:49
Allate 发表于 2020-12-11 11:04
说好的CAD二次命令，请查收。（注：这个是用LISP来写的，具体怎么用参考这里）
命令：FIX_SKETCH（这个可 ...

版主大大太有心了，上面那个宏可以满足了，CAD也可以用。感谢了 。
作者: asbubble    时间: 2021-6-27 23:31
顶一下,学习了!
作者: tengda1234    时间: 2022-3-15 10:25
Allate 发表于 2020-12-11 11:04
说好的CAD二次命令，请查收。（注：这个是用LISP来写的，具体怎么用参考这里）
命令：FIX_SKETCH（这个可 ...

这个是怎么用的？
作者: whdong76    时间: 2023-2-11 16:37
SW机械工程师网，找到组织了！
作者: zxt0824    时间: 2023-11-16 15:45
Allate 发表于 2020-12-8 15:35
看看行不行，我也是按API来改，没做过测试。

A大，这个宏已用，很好用。就是有个问题，就是默认工程图模板必须要打开显示观阅草图，这样转出DXF才会显示草图。 有没有办法可以跳过默认工程图模板这块。
作者: zxt0824    时间: 2023-11-17 08:11
zxt0824 发表于 2023-11-16 15:45
A大，这个宏已用，很好用。就是有个问题，就是默认工程图模板必须要打开显示观阅草图，这样转出DXF才会显 ...

@Allate 这个问题已经找到办法解决了。现在就是折弯线如何不显示，只显示草图呢。感谢
作者: Allate    时间: 2023-11-17 08:30
zxt0824 发表于 2023-11-17 08:11
@Allate 这个问题已经找到办法解决了。现在就是折弯线如何不显示，只显示草图呢。感谢

你把最后一行的13更改成9即可。
作者: 沉默的人    时间: 2023-11-17 08:50
好好学习，天天向上！
作者: zxt0824    时间: 2023-11-17 09:33
Allate 发表于 2023-11-17 08:30
你把最后一行的13更改成9即可。

感谢大佬回复，刚用笨办法试出来了。回到帖子一看大佬已经回复了，非常感谢
作者: 懒懒的高贵    时间: 2024-7-26 14:45
感谢楼主分享，很不错！
作者: 风雨阳光    时间: 2024-12-12 20:21
SolidWorks机械工程师网，顶一下。
作者: jyzas001    时间: 2024-12-13 08:37
顶一下,学习了!



欢迎光临 SolidWorks机械工程师网——最大的SolidWorks学习平台 (https://www.swbbsc.com/) Powered by Discuz! X3.2