【魍生技】-代号名称自动分离宏命令

超源 · 发表于 2021-12-6 20:01:20

还算实用的功能

dickych · 发表于 2021-12-11 15:24:20

感谢分享，收下了。

饭桶 · 发表于 2021-12-29 14:18:41

感谢楼主，一直困扰的问题，好东西必须学习。

凌凌柒 · 发表于 2022-1-14 16:42:20

威望不够，下载不下来

凌凌柒 · 发表于 2022-1-14 16:44:46

没下载权限，我输入图号名称也是服服帖帖受不了拉

dickych · 发表于 2022-1-22 14:19:32

谢谢楼主分享

Ranger003 · 发表于 2022-2-6 16:11:51

谢谢大佬，这样方便多了

xinshiji666 · 发表于 2022-2-11 16:31:56

t = Left(LTrim(e), 3)
这行代码有些多余吧！开始声明了 Dim e As String , 但并没有赋值，这里是想实现：如果文件名开头是“GBT”的话，就自动更改为“GB/T”，可这里的e是空字符串，没有赋值啊！试了一下，可以实现自动添加代号、名称属性，简单实用。
提个建议，程序执行完后，可以弹窗提醒，已完成。在倒数第二行插入：msg = MsgBox("OK", vbOKOnly)

挑剔的耳朵 · 发表于 2022-3-4 14:24:28

感谢楼主，有了这个东西真是太好了

雨季77 · 发表于 2022-3-6 14:51:54

谢谢分享，学习了。

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