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

标题: Soliworks宏钣金取展开尺寸添加自定义下料尺寸 [打印本页]
作者: xiaozhao123    时间: 2022-6-9 08:50
标题: Soliworks宏钣金取展开尺寸添加自定义下料尺寸
求大神  一键宏   钣金取展开尺寸并添加到配置特定下料尺寸


1654735802701.jpg
作者: wetiuer    时间: 2022-6-9 11:31
看了楼主的截图，获取钣金展开尺寸可以用切割清单或平板型式的边界框草图。

参考这个帖子自己在用的图号分离、删除所有属性、单位，差不多5、6个宏合并到一个宏，求指导优化，不知道怎么搞的，今天我不能做链接，

我只有把这个帖子中楼主宏代码复制过来，供参考。



  2. '展开长宽
  3. Dim swFeature As SldWorks.Feature
  4. Dim FeatName As String
  5. Dim FeatType As String
  6. Set swFeature = swModel.FirstFeature
  7. While Not swFeature Is Nothing '遍历零件FeatureManager并获取特征和属性
  8. FeatName = swFeature.Name '获取特征名称
  9. FeatType = swFeature.GetTypeName '获取特征属性
  10. If FeatType = "CutListFolder" Then
  11. swFeature.Name = "切割清单项目" '修改名称
  12. End If
  13. Set swFeature = swFeature.GetNextFeature
  14. Wend
  15. 'swModel.AddCustomInfo3 "", "长", swCustomInfoText, """SW-边界框长度@@@切割清单项目@零件.SLDPRT""" 'VB语法，两个引号组成一个引号
  16. 'swModel.AddCustomInfo3 "", "宽", swCustomInfoText, """SW-边界框宽度@@@切割清单项目@零件.SLDPRT"""
复制代码


作者: hengzhou9571    时间: 2022-6-11 17:24
好好学习，天天向上！
作者: DFFDSGG114485    时间: 2022-6-12 19:52
感谢楼主分享，很不错！
作者: xiaozhao123    时间: 2022-6-13 08:44

感谢楼主分享，很不错！
作者: yun6yun7    时间: 2022-7-1 20:36
SW机械工程师网，找到组织了！
作者: 懒懒的高贵    时间: 2022-8-4 17:28
好好学习，天天向上！
作者: weiyw1989    时间: 2024-3-15 17:25
SW机械工程师网，找到组织了！
作者: 风雨阳光    时间: 2024-3-18 10:13
很不错，找到组织了！
作者: taolai89    时间: 2024-5-2 20:40
楼主能共享一下模型吗？我真的很喜欢



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