機(jī)械社區(qū)

 找回密碼
 注冊(cè)會(huì)員

QQ登錄

只需一步,快速開始

搜索
樓主: 魍者歸來
打印 上一主題 下一主題

【魍生技】-代號(hào)名稱自動(dòng)分離宏命令

[復(fù)制鏈接]
131#
發(fā)表于 2021-12-6 20:01:20 | 只看該作者
還算實(shí)用的功能
132#
發(fā)表于 2021-12-11 15:24:20 | 只看該作者
感謝分享,收下了。
133#
發(fā)表于 2021-12-29 14:18:41 | 只看該作者
感謝樓主, 一直困擾的問題,好東西必須學(xué)習(xí)。
( }4 I' K# n% c: x" f, v
134#
發(fā)表于 2022-1-14 16:42:20 | 只看該作者
威望不夠,下載不下來
135#
發(fā)表于 2022-1-14 16:44:46 | 只看該作者
沒下載權(quán)限,我輸入圖號(hào)名稱也是服服帖帖受不了拉
136#
發(fā)表于 2022-1-22 14:19:32 | 只看該作者
謝謝樓主分享
137#
發(fā)表于 2022-2-6 16:11:51 | 只看該作者
謝謝大佬,這樣方便多了
138#
發(fā)表于 2022-2-11 16:31:56 | 只看該作者
t = Left(LTrim(e), 3) % F+ m9 \* p! k- j
這行代碼有些多余吧!開始聲明了 Dim e As String , 但并沒有賦值,這里是想實(shí)現(xiàn):如果文件名開頭是“GBT”的話,就自動(dòng)更改為“GB/T”,可這里的e是空字符串,沒有賦值啊!試了一下,可以實(shí)現(xiàn)自動(dòng)添加代號(hào)、名稱屬性,簡(jiǎn)單實(shí)用。' ^' M) J; P) x+ ]2 e
提個(gè)建議,程序執(zhí)行完后,可以彈窗提醒,已完成。在倒數(shù)第二行插入:msg = MsgBox("OK", vbOKOnly)
139#
發(fā)表于 2022-3-4 14:24:28 | 只看該作者
感謝樓主,有了這個(gè)東西真是太好了' O) m# v: e! {
140#
發(fā)表于 2022-3-6 14:51:54 | 只看該作者
謝謝分享,學(xué)習(xí)了。

本版積分規(guī)則

小黑屋|手機(jī)版|Archiver|機(jī)械社區(qū) ( 京ICP備10217105號(hào)-1,京ICP證050210號(hào),浙公網(wǎng)安備33038202004372號(hào) )

GMT+8, 2024-11-15 19:54 , Processed in 0.058598 second(s), 15 queries , Gzip On.

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回復(fù) 返回頂部 返回列表