如何用宏批量修改指定零件的切割清单项目名称？

moipourlui · 发表于 2015-1-16 19:54:43

由于小人破坏（那种小人啥也不会，到处给人胡说，还一副假正经，纯粹论坛里的混子），原帖无法进入，重新开贴咨询，用 feather.name="xxxx",虽然能够成功将切割清单项目项目名称更改，但该切割清单项目里面的系统自定义属性，如 LENGTH@@@切割清单项目名称1@零件名称，引用的还是“切割清单项目名称1”而不是改名后的名称，求助如何同时更新切割清单项目名称及里面自定义属性引用的名称？，比如下面代码该如何修改，才能达到那种效果？
Sub main()Set swApp = Application.SldWorks
Set Part = swApp.ActiveDocSet SelMgr = Part.SelectionManager
Part.ClearSelection2 Trueboolstatus = Part.Extension.SelectByID2("Cut-List-Item1", "SUBWELDFOLDER", 0, 0, 0, False, 0, Nothing, 0)
SelMgr.GetSelectedObject5(1).Name = "NEW NAME"
End Sub
备注一下，此帖不欢迎那位小人，请小人”免回尊贴“！！！

51555 · 发表于 2015-1-17 13:05:00

我已於舊帖告知樓主「注意論壇禮節」！
加入論壇圖的就是一個互相幫忙與學習，但請記注：不是大家都有義務回答您的任何提問！
能回答，我們該心存感激；不回答，該檢討自己是否發言不當造成關注度不夠，而不是惡言相向！
由此對照工程师及版大無時的無私奉獻，更顯難能可貴！
也杖绱舐剐炙?f，藉由一些「加入會員才能得到對等利益及幫助」的方式並不為過！
言盡於此，以下回覆您的提問…
編程我是門外漢，但幾天前就已經關注此帖。
藉由朋友的幫助，給出了一個「暫時性」的解決方式。
由於朋友也忙碌，而且樓主的要求(焊件清單重新批次命名)實在也非常態性做法，
所以，以下提供的代碼是參照原廠提供的練習加以修改，並未多花時間重新編寫代碼，不可諱言的可以再精簡許多~
效果如下：
【用工程师以前的焊件教程為例】可見系統默認的清單名稱。

【執行代碼】

【執行的結果】

【焊件屬性名稱也一併修改了！】

【重申】由於樓主的要求非業界常態做法，此種命名方式妥當與否尚有討論的空間。
因此只將該文件的密碼PM給樓主，有需要的朋友可以向樓主索取。
操作時，只要將圖三中箭頭所指代碼，改為自訂的字符，咝嗅峒纯蛇_到批量重新命名的要求。

CutListRename.rar (12.73 KB, 下载次数: 238)

jjdqxczk1986 · 发表于 2015-1-17 22:11:16

小王侠的代码好像是先把特征的名称赋值，然后逐个i获取该特征相关自定义属性值，然后将赋值名称替换原名称并删除原属性添加替换名称后的属性，并做成了一个模块，直接引用，不是单纯feather.name="xxxx"那么简单，再请教小王侠一下，我通过录制手动直接改名生成的代码是，Sub main()
Sub main()
Set swApp = _
Application.SldWorks
Set Part = swApp.ActiveDoc
boolstatus = Part.Extension.SelectByID2("切割清单项目1", "SUBWELDFOLDER", 0, 0, 0, False, 0, Nothing, 0)
boolstatus = Part.SelectedFeatureProperties(0, 0, 0, 0, 0, 0, 0, 1, 0, "new name")
End Sub
就这么简单，可把这部分代码单独执行却没有任何更改，执行并在end sub设中断，boolstatus的值也都是true，这是什么原因？

a330226 · 发表于 2015-1-18 00:02:23

按小王侠代码执行成功，感谢小王侠的热心无私！

并接受小王侠的意见，不再强人所难！

cc4072 · 发表于 2015-1-18 02:55:24

经典案例图书

看看下载

bs16007 · 发表于 2015-1-18 03:24:49

楼主密码是多少

卫斯里 · 发表于 2015-1-18 06:24:09

经典案例图书

压缩包密码是多少呢

x450049564 · 发表于 2015-1-19 03:10:04

这种命名方式感觉相当的少见，还是建议楼主不要把宏想成是万能的，有些东西还是得看人为的去进行设置的，这样才能保证自己做的东西自己心里有数。

yueyu1219 · 发表于 2015-1-20 09:18:24

要了好久密码就是不答复

cxxcxw · 发表于 2015-1-20 12:30:48

感觉这个三维社区这么多牛人啊

荔港模具-1 · 发表于 2015-1-20 13:07:11

求解压密码，谢谢

月下乌鸦 · 发表于 2015-1-20 17:33:53

求密码

逆鳞--月渎 · 发表于 2015-1-21 05:27:17

求密码

yni621 · 发表于 2020-7-16 17:21:51

很不错，顶一下！

wmx0910 · 发表于 2020-7-30 13:49:21

加入QQ群
参与讨论和学习

或扫描二维码加入

楼主贡献下、毕竟需要这个功能的只是一部分人、

huangjie2008 · 发表于 2020-9-2 17:53:57

经典案例图书

楼主能分享密码吗

1215956038 · 发表于 2021-4-12 21:40:27

加入QQ群
参与讨论和学习

或扫描二维码加入

楼主辛苦了！

taolai89 · 发表于 2023-9-6 21:09:17

经典案例图书

楼主太有才了，膜拜中……

taolai89 · 发表于 2023-9-11 09:53:33

SW机械工程师网，找到组织了！

samsun288 · 发表于 2023-9-11 21:53:47

没图，不知道是什么！

		自动登录	找回密码
密码			立即注册

如何用宏批量修改指定零件的切割清单项目名称？

最佳新人

活跃会员

热心会员

宣传达人

灌水之王

突出贡献