重命名零件宏

Dustry · 发表于 2024-4-3 14:26:00

Dustry 发表于 2024-4-3 13:29
: n$ K6 _1 `; A运行报错咋解决啊大佬

Status = swSelModelext.SaveAs3(mip, 0, 512, Nothing, Nothing, Error, Warning) '更改零件文件名（替换装配体中的原文件）
* c5 a) g1 `; a( Q) ?$ X9 h1 i对象不支持这个属性或方法（错误 438）

peiyj · 发表于 2024-4-4 12:44:07

运行出错

头铁杨 · 发表于 2024-5-20 14:38:53

好用，如果再加个删除原图纸就更完美了

落叶luoyi · 发表于 2024-5-23 13:01:48

提示编译错误：没有适当的对象，方法无效
大佬，这个怎么修改啊

cot · 发表于 2024-6-2 21:04:00

感谢

小菜鸡123 · 发表于 2024-9-3 10:13:04

怕瓦落地2011 发表于 2023-8-22 21:14
, W5 [- X' Y x8 i5 ?0 o! m: `授人以鱼，不如授人以渔

为什么复制了代码，点击了启动，没有反应，重新启动也没有反应，代码里面红色的，这个有关系吗？

东海之上 · 发表于 2024-12-18 17:24:42

请问下，卡到这步是什么问题呢？零件名已经更改过来了，但是工程图没动静。

一米阳光7915 · 发表于 2024-12-19 13:54:39

要是能删除原始模型和工程图就更好了

大江大河-Meche · 发表于 2025-6-7 17:02:22

落叶luoyi 发表于 2024-5-23 13:01
$ k0 X) d5 K) I9 _2 I0 }. Z) v提示编译错误：没有适当的对象，方法无效
6 V$ m4 y @! V: l% o大佬，这个怎么修改啊

版本不适，不支持函数

LIULISHAN · 发表于 2025-6-29 23:39:18

Dustry 发表于 2024-4-3 14:26# W* I1 n: x1 o4 k' C: }, o, i2 q2 r
Status = swSelModelext.SaveAs3(mip, 0, 512, Nothing, Nothing, Error, Warning) '更改零件文件名（替 ...

拿去，不用谢
Status = swSelModelext.SaveAs2(mip, 0, 512, Nothing, "", False, Error, Warning) '更改零件文件名（替换装配体中的原文件）

		自动登录	找回密码
密码			注册会员