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

标题: 装配或零件下名称后显示材料名 [打印本页]

作者: 567890 时间: 2024-3-9 14:26
标题: 装配或零件下名称后显示材料名
装配或零件下运行文件，可以批量修改零件名称后的显示状态，隐藏其它的树显示项目，只保留配置名称和说明，将材料名添加到配置说明并显示。效果见图

名称后显示材料名.rar

（10.81 KB, 下载次数: 160 售价: 10 金币 ）

作者: 沉默的人 时间: 2024-3-9 16:40
感谢楼主分享，很不错！

作者: z460515477 时间: 2024-3-11 00:06
好东西，努力学习学习！

作者: 随遇而安9528 时间: 2024-3-12 08:26
很不错，顶一下！

作者: 18753845346 时间: 2024-3-12 08:53
运行错误， 91
winth块变量未设置

作者: wjbg2019 时间: 2024-3-12 13:38
好东西，努力学习学习！

作者: dengchenghui 时间: 2024-3-12 14:26
楼主辛苦了！

作者: Yemao丶 时间: 2024-3-12 17:04
很不错，顶一下！

作者: dengchenghui 时间: 2024-3-13 11:11
楼主太有才了，膜拜中……

作者: dengchenghui 时间: 2024-3-13 14:39

18753845346 发表于 2024-3-12 08:53
运行错误， 91
winth块变量未设置

我也有这个问题，你的解决了没有？

作者: hhh001 时间: 2024-3-13 18:56

18753845346 发表于 2024-3-12 08:53
运行错误， 91
winth块变量未设置

同样也有这个问题，感觉一部分原因是装配体中有压缩文件，才报错

作者: 567890 时间: 2024-3-13 21:06
感谢大家的回复，确实程序在装配体有压缩零件时运行会报错，考虑不全，请多包涵，下面是修改后的代码：有两处需要修改，第一处原文代码:

If Not swComp Is Nothing And Not swComp.IsSuppressed And swComp.GetModelDoc2.GetType = swDocumentTypes_e.swDocPART Then
Document swComp.GetModelDoc2
End If

复制代码

修改为:

If Not swComp Is Nothing And Not swComp.IsSuppressed And Not swComp.GetModelDoc2 Is Nothing Then
If swComp.GetModelDoc2.GetType = swDocumentTypes_e.swDocPART Then
Document swComp.GetModelDoc2
End If
End If

复制代码

第二处原文代码:

Set swFeatTree = swComp.GetModelDoc2.FeatureManager
ConfigureFeatureManager swFeatTree

复制代码

修改为:

If Not swComp Is Nothing And Not swComp.IsSuppressed Then
Dim compModel As SldWorks.ModelDoc2
Set compModel = swComp.GetModelDoc2
If Not compModel Is Nothing Then
Set swFeatTree = compModel.FeatureManager
ConfigureFeatureManager swFeatTree
End If
End If

复制代码

作者: hhh001 时间: 2024-3-14 11:22

567890 发表于 2024-3-13 21:06
感谢大家的回复，确实程序在装配体有压缩零件时运行会报错，考虑不全，请多包涵，下面是修改后的代码：有两 ...

感谢楼主分享，改了后可以用

作者: hdgd501 时间: 2024-3-14 12:36
楼主太有才了，膜拜中……

作者: 淡淡的雲 时间: 2024-3-15 15:52
感谢楼主分享，很不错！

作者: yni621 时间: 2024-3-15 16:02

567890 发表于 2024-3-13 21:06
感谢大家的回复，确实程序在装配体有压缩零件时运行会报错，考虑不全，请多包涵，下面是修改后的代码：有两 ...

正想上来问怎么改压缩报错，就有答案了，非常给力。

作者: dengchenghui 时间: 2024-3-15 16:54

567890 发表于 2024-3-13 21:06
感谢大家的回复，确实程序在装配体有压缩零件时运行会报错，考虑不全，请多包涵，下面是修改后的代码：有两 ...

楼主能把改好的发一个给我吗？我改了以后还是不行。649798756@qq.com 谢谢

作者: dengchenghui 时间: 2024-3-15 16:56
楼主帮帮忙发一下给我，谢谢

作者: XBCYANP 时间: 2024-3-18 19:45
楼主辛苦了！

作者: tommyshy 时间: 2024-3-20 08:41
楼主很专业，写得很好！

作者: richiwei 时间: 2024-3-20 09:20
感谢楼主分享，很不错！

作者: dolou123 时间: 2024-3-23 15:09
感谢楼主分享，很不错！

作者: 954833266 时间: 2024-3-31 16:56
好东西，努力学习学习！

作者: fan03488 时间: 2024-4-6 16:46
感谢楼主分享，很不错！

作者: wwl808 时间: 2024-4-10 16:18
大佬们这个宏显示材料后面还能增加个自定义属性如类别吗？

作者: dragon045 时间: 2024-4-11 08:27
修正后打包，不然找半天

名称后显示材料名.zip

（14.93 KB, 下载次数: 184 售价: 5 金币 ）

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