关于文件夹名称的链接

ivan19943

   经典图书

我只想要得到文件夹名称不要全路径行不行啊 ? 如图圈住的部分.
用别的法子实现也行 要自动化的,求摸索,主要目的用来显示项目名
或者把一属性指向一个文本文件的内容

紾惜薆

你说清楚那行文字是如何得到的吗，想求助还说不清楚问题

Lamandu

   经典图书

来吧，我顶一下，求答案。大家帮忙看看~
看看热闹。

mj1j

試試以下代碼…執行以後會新增一個"FolderName"(資料夾名稱)的屬性。
路徑改變時記得再執行一次。

Sub main()
Set swApp = Application.SldWorks
Set model = swApp.ActiveDoc
modelpathname = model.GetPathName
pathname = Left(modelpathname, InStrRev(modelpathname, "") - 1)
pathname2 = Left(pathname, InStrRev(pathname, ""))
folder = Right(pathname, Len(pathname) - Len(pathname2))
retval = swApp.ActiveDoc.DeleteCustomInfo2(sConfigName, "FolderName")
retval = swApp.ActiveDoc.AddCustomInfo3(sConfigName, "FolderName", swCustomInfoText, folder)
End Sub

复制代码

ss781509125

   经典案例图书

,理解不同,表达亦不同

happinesss

能不能不用宏啊?或者让宏 重建时 自动触发运行

sunny136

   经典案例图书

樓主的要求一直都很「特別」~
此處若不想用宏，已經不是我這種半桶水能解決的了。
若想自動觸發咝校?壳爸幌氲健柑蒯绾辍梗??俏也粫?憽！！

zhangding

还是要感谢小王的代码,虽然只实现了半自动

科能通讯

自動執行除了【宏特徵】還有更安全的【常駐宏】。
丹弟也成功測試的，見以下鏈接：
提取當前文件夾名稱的【常駐宏】更是有現成可用的，見以下鏈接，只是各位都貴人善忘 或 日理萬機，忽略這些不顯眼的小東西不足為奇。
solidworks机械工程师论坛

asdgda

   经典图书

智能才想利用中午時間回顧悶哥的教程：
還沒看完就被您抓到了~~~真是慚愧呀…
回顧以前的帖子總是有幫助的，謝謝悶哥提醒！

fegnyue

很不错，顶一顶。

When_love_life

版主牛逼

cgezu

小王 用大王的AutoRun.swp宏的代码怎么 实现 运行我的宏啊 ？
或者说 能不能把AutoRun.swp的内容替换成 别的宏代码，为啥这个“常驻宏（AutoRun.swp）” 要间接去运行别的宏啊？大王的AutoRun.swp代码完全不知道该怎么弄，我的自动运行宏啊，求帮助。
能不能把大王的AutoRun.swp的没用的代码去除掉，只留自动运行子宏的代码。
不懂VB编程的表示很吃力。

wudipig13

为啥这个“常驻宏（AutoRun.swp）” 要间接去运行别的宏啊？   以下是俺個人的理解…
藉由「AutoRun.swp」(名字當然是自訂。)這個「介面」，
執行不同功能的代碼，工作上就可以依每次的需求來完成不同的任務。
例如此處，樓主是需要提取每個檔案當前所在的資料夾名稱。
又例如，可以配合「代號- 名稱分離」的代碼來實現添加代號及檔案名稱兩欄屬性。
杖鐞灷洗笏?f，常駐宏的使用比起特徵宏來得更為直觀，
個人解讀：有需要時就讓autorun執行不同功能的宏代碼；不需要時，就無需執行。
操作方式及過程工程师都寫得很詳細，連結也很完全，俺也是按其操作成功的~
樓主建立/操作過程有什麼問題不妨提出來討論。
如果只有一句不懂編程…相信工程师的「鴨梨」不會少於您的~~

tanlihua

加入QQ群
参与讨论和学习

或扫描二维码加入

留下记号

uzgaa

   经典案例图书

小王，楼主太雷人了。。。
懒到极致了。。。
小王你还能这么耐心的讲解，我还真是挺佩服你的