【遍历宏】在总装配內零件的自定义属性写入页码

只看该作者 · 发表于 2018-10-9 17:29:09

请问一下，遍历宏如何剔除指定的零件，我有一些标准件，GB开头的，这些零件我不需要遍历宏进行分离图号名称写入属性，我想知道如何把GB开头的不包含在遍历清单中，自己捣鼓没结果，望指教，谢谢！

只看该作者 · 发表于 2018-10-9 19:06:58

s78763036 发表于 2018-10-9 17:29
请问一下，遍历宏如何剔除指定的零件，我有一些标准件，GB开头的，这些零件我不需要遍历宏进行分离图号名称 ...

别放在遍历的文件夹里就行

只看该作者 · 发表于 2018-10-10 12:34:55

本帖最后由 wenmk 于 2018-10-11 18:07 编辑

谢谢您的分享，我复制代码后运行没有反映，能否分享完整文件，谢谢！

只看该作者 · 发表于 2018-10-13 10:34:59

qxzch 发表于 2018-10-9 19:06
别放在遍历的文件夹里就行

意思是硬盘零件不放在同一文件夹？我试过了没效果啊

只看该作者 · 发表于 2018-10-15 11:33:01

s78763036 发表于 2018-10-13 10:34
意思是硬盘零件不放在同一文件夹？我试过了没效果啊

楼上的兄弟，能否把宏分享一份给我，我复制代码后运行没反映，谢谢！

只看该作者 · 发表于 2018-10-15 20:30:17

wenmk 发表于 2018-10-15 11:33
楼上的兄弟，能否把宏分享一份给我，我复制代码后运行没反映，谢谢！

代码复制上来后，不知何故，有几处与路径有关的反斜杠“\”丢失了！

只看该作者 · 发表于 2018-10-15 20:33:51

第20行：FilePath = FilePath & "\"
第31行：If Right(folder, 1) <> "\" Then folder = folder & "\"

只看该作者 · 发表于 2018-10-16 11:36:01

qxzch 发表于 2018-10-15 20:33
第20行：FilePath = FilePath & "\"
第31行：If Right(folder, 1) "\" Then folder = folder & "\"

楼主能上传一份完整文件不，我复制后运行没有反映，也不报错，谢谢！

只看该作者 · 发表于 2020-2-17 12:29:09

可以用遍历设计树的方法去添加页码，过滤掉压缩、阵列、标准件、及不包括在BOM内的模型，这样做可以使页码与装配顺序一至。

只看该作者 · 发表于 2024-9-26 10:15:56

很实用的宏，几年了也没见合理更新呢？

[求助] 【遍历宏】在总装配內零件的自定义属性写入页码