找回密码 注册 QQ登录
一站式解决方案

iCAx开思网

CAD/CAM/CAE/设计/模具 高清视频【积分说明】如何快速获得积分?快速3D打印 手板模型CNC加工服务在线3D打印服务,上传模型,自动报价
打印 上一主题 下一主题

[分享] 【焊件】闷大的焊件总重宏,一些看似无关的系统操作实则会影响宏运行

  [复制链接]
121
发表于 2020-12-23 20:31:11 | 只看该作者
本帖最后由 cj8510 于 2020-12-23 20:32 编辑

楼主研究的非常透彻,把pn = Part.GetTitle改为pn = Right(Part.GetPathName(), Len(Part.GetPathName()) - InStrRev(Part.GetPathName(), "\"))
就可以隐藏扩展名来运行的。之所以不能隐藏扩展名的原因是原来获取的是窗口标题,而窗口标题是随着系统设置来的,隐藏扩展名就导致写入公式的文件名内没有了扩展名,这样公式就失效了。

还有If BodyCount > 0 Then改为If BodyCount > 0 And thisFeat.GetTypeName = "SolidBodyFolder" Then
改了之后会更好,这样不会循环到光源和基准面里面去。


我也是特意写了一个窗口来看这些代码的动作,不然真的看不懂,里面好几个循环。




总的来说闷大分享的内容非常值得学习。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
122
发表于 2021-4-14 13:49:36 | 只看该作者
感谢分享  学习了
123
发表于 2021-7-13 11:38:50 | 只看该作者
学习学习再学习
124
发表于 2021-7-15 15:55:53 | 只看该作者
谢谢分享    很好的教程
125
发表于 2021-8-9 15:40:55 | 只看该作者
法尔风啊发我个人个人
126
发表于 2021-9-1 13:51:56 | 只看该作者
干的漂亮,顶你一下
127
发表于 2021-9-2 16:08:15 | 只看该作者
大神级别的人物呀
128
发表于 2021-12-3 17:03:25 | 只看该作者
感谢楼主分享经验
129
发表于 2021-12-8 15:46:38 | 只看该作者
感谢楼主分享经验
130
发表于 2021-12-23 14:38:19 | 只看该作者
自己正学三维软件
您需要登录后才可以回帖 登录 | 注册

本版积分规则

3D打印手板模型快速制作服务,在线报价下单!

QQ 咨询|手机版|联系我们|iCAx开思网  

GMT+8, 2025-1-24 16:41 , Processed in 0.032607 second(s), 8 queries , Gzip On, Redis On.

Powered by Discuz! X3.3

© 2002-2025 www.iCAx.org

快速回复 返回顶部 返回列表