宏提取文件名字符为何不成功

xlh0 · 发表于 2013-6-22 08:47:00

按下面帖子学习做了一下，我的2011版本不成功，操作N变了，
现请教大家，谢谢参与~~
下面原贴标题和地址
SolidWorks中方程式的应用技巧
SolidWorks机械工程师论坛
原贴方程式：dummy=part.Extension.CustomPropertyManager("").Set("partno",Left(part.GetTitle,9))
方程式目的是从文件名中从左到右取9个字符

benzlxb · 发表于 2013-6-22 08:48:15

如下VBA 宏的編程[2012版測試]
' **************************************************
' macro recorded on 06/24/13 by lsc
' **************************************************
Dim swApp As Object
Dim Part As Object
Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Set swModel = swApp.GetFirstDocument
path_name = swModel.GetPathName '取出目前檔案的路徑及名稱
name_ = swModel.GetTitle '取出目前檔案的名稱
name_9 = Left(name_, 9) '取出目前檔案名稱前9位文字
End Sub

Doreen · 发表于 2013-6-22 08:48:33

下面是我在其它论坛得到的某位前辈的宏，你看看

图号名称分离宏.rar (9.83 KB, 下载次数: 27)

yaya89757 · 发表于 2013-6-22 08:48:58

十分感谢梁老师提供代码学习~~
提示进来学习的坛友！
通过在自定义属性里嵌入宏代码，问题已解决。
下面代码在2011版本中均已测试成功。
15楼代码，可以取左边字符
19楼代码，可以取最后一个下划线后面的字符。
下面这段代码，可以取第一个下划线前面的字符。
1
dim yfd
yfd=part.Extension.CustomPropertyManager("").Set("partno",Left(part.GetTitle,InStr(1,part.GetTitle,"_")-1))

army22 · 发表于 2013-6-22 08:49:50

经典案例图书

感谢杀苏提供宏文件分享，学习

蛤蟆老鼠 · 发表于 2013-6-22 08:49:52

蛋大的教程可能有幫助

7o05juk516 · 发表于 2013-6-22 08:49:55

经典案例图书

非常感谢大师指引

㊣kicker · 发表于 2013-6-22 08:50:46

楼主添加成功了吗？为何显示无效语句？

aiwang123w · 发表于 2013-6-22 08:51:24

没有成功

最爱-钢笔字 · 发表于 2013-6-22 08:51:29

2009版本以後，宏的嵌合方法已經改變，具體請參附件（2012版本）。

123456789-qiminger.rar (16.24 KB, 下载次数: 44)

animarui · 发表于 2013-6-22 08:51:41

看一下十楼方法，有源文件2012版本的，源文件我打不开。你如果研究明白了，说说方法再截两个图。

虚拟的笑 · 发表于 2013-6-22 08:53:22

不好意思，再麻烦大侠老师，我的是2011版本。
我按图在自定义属性里加代码，重建模型，保存关闭文件，重新打开也没成功。
是不是还要添加方程式呢？

fengbao44 · 发表于 2013-6-22 08:53:32

試下這個

123456789-qiminger2009或以上版本.rar (11.35 KB, 下载次数: 22)

qoro · 发表于 2013-6-22 08:53:44

谢谢~我试了你给我的，重命名之后重建，属性可以更新，好使的。
我新建之后做出的，做很多次，还是不好使，我感觉过程不应该有问题了。
也许是学习版本的问题

2011版本

987654321-qiminger.rar (17.86 KB, 下载次数: 10)

soonew · 发表于 2013-6-22 08:53:47

加入QQ群
参与讨论和学习

或扫描二维码加入

謝謝qiminger兄回帖討論。
方程式的寫法正確，出現的驚嘆號代表呼叫的屬性值不是數值。
問題在內碼嵌合到“數值/文字表達”不對。
把以下內碼copy&paste到“數值/文字表達”欄位再試一下吧。

Jason.Pop · 发表于 2013-6-22 08:53:50

经典案例图书

大侠，请教一下。我这样格式的文件名如何提取
例如：300_222_33_固定销压板，我只想提取最后一个下划线“_”后面的字符，如本例的固定销压板，但是最后一个下划线的后面的字符个数还不固定。

dhs1998 · 发表于 2013-6-22 08:53:56

加入QQ群
参与讨论和学习

或扫描二维码加入

成功了~~
直接从你给我的源文件属性栏里复制，再回来粘帖，终于可以了，
宏真神奇，我英文不好理解困难，再次感谢了~~~

jshjjt · 发表于 2013-6-22 08:54:09

经典案例图书

重新命名后，好像就不更新了啊
弄个批量的宏

1728078718 · 发表于 2013-6-22 08:54:09

把以上內碼copy&paste到“數值/文字表達”欄位試一下吧。
注意！必定要使用複製粘貼的方法，才可嵌合內碼到欄位。

hpjin · 发表于 2013-6-22 08:54:18

估計又是『脖子掛餅終餓死』的慘案一宗。

		自动登录	找回密码
密码			立即注册

宏提取文件名字符为何不成功

相关帖子