catia设计树_在CATIA目录树上**零件号原来这么简单！

各位攻城狮们在用CATIA设计完一个部件之后需要修改零件号的时候

是不是很讨厌CAITA像下面一样的操作呢↓

首先，右击零件号打开属性窗口

其次，拖动选择零件号(零件号很长时，拖动很不好操作)

最后，**选中文字

以上操作中最烦的是当需要拷贝很长零件号的时候，经常拖到后面怕前面没有选中全，拖到前面怕后面没有选择全。

如果可以在目录树中选中零件号后，按一个快捷键就可以**，那该多好。只可惜CATIA本身并没有这样的功能。那么能不能将美好的愿望变为现实呢？

就在吃柚子皮的时候，答案已经肯定了。

选择零件号，按一个快捷键就可以**，你还觉得烦吗？

我们都知道每个宏都是可以设置快捷键的(什么，你还不知道怎么给宏设置快捷键？没事，就在下次吃柚子皮的时候，我会告诉你。)，那么下面就是你需要的宏：

你要学习的关键点全在这

以下是宏内容的关键点呢：

1. 首先是获取你选择的对象

Dim Sel As Selection

Set Sel = CATIA.ActiveDocument.Selection

2. 然后这里只需要选择对象的第一个元素(如果你已经选择了好几个零件号，只取第一个呢)

Dim SelItem

Set SelItem = Sel.Item(1)

3. 最后是获取你选择第一个元素的零件号

Dim Spn

Spn = SelItem.LeafProduct.PartNumber

获取到了零件号，剩下的就是如何将它放入剪贴板中了，你知道吗？

这样好的CATIA宏你想要吗？