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

標(biāo)題: SW文件名如何自動(dòng)提取出來填寫到零件的代號(hào)以及名稱里 [打印本頁(yè)]
作者: pp3711962    時(shí)間: 2019-10-16 10:58
標(biāo)題: SW文件名如何自動(dòng)提取出來填寫到零件的代號(hào)以及名稱里
如圖，我想每一次保存文件的時(shí)候，或者以另一個(gè)文件名保存文件的時(shí)候，零件屬性中的代號(hào)，以及名稱可以自動(dòng)更改例：文件名是 sw1501-sdun2000.03.20-02 轉(zhuǎn)動(dòng)軸" ^5 O6 {- c& J* K) k
對(duì)應(yīng)的零件代號(hào)就是：sw1501-sdun2000.03.20-02
1 c" ?1 a$ S3 X+ K; ^& a4 F對(duì)應(yīng)的名稱就是：轉(zhuǎn)動(dòng)軸7 q- N  r  n$ t- X
假如另存成另一個(gè)文件，命名為SW-16.CB2000.05.03-01 轉(zhuǎn)動(dòng)軸
5 X- V3 r- w4 s3 p% w, S則零件屬性中的代號(hào)以及名稱可以自動(dòng)更改為“SW-16.CB2000.05.03-01”和“轉(zhuǎn)動(dòng)軸”
4 |# R1 Q/ ~7 o1 Z- S! Q
8 Z) x* J. F3 J/ t( E2 ?2 Y9 C8 P0 N" Y

9 e0 `. N  ?  M& \4 b4 o' Y6 S) x
作者: pp3711962    時(shí)間: 2019-10-16 11:03
有什么方法可以讓零件的代號(hào)以及名稱可以自動(dòng)提取更改，我在網(wǎng)上查了一個(gè)可以用宏來操作，還有一種可以直接輸入某種代碼，這個(gè)代碼現(xiàn)在我找不到了，代碼只能提取完整的文件名，而并不能進(jìn)行分開
作者: 魍者歸來    時(shí)間: 2019-10-16 11:11
【魍生技】-代號(hào)名稱自動(dòng)分離宏命令
  w2 h4 w' f5 I% E3 l- o1 Mhttp://www.mg7058.com/thread-478738-1-1.html. U% h1 ^- y4 _7 z/ Q
(出處: 機(jī)械社區(qū))8 ?+ @+ t3 m' h3 W% d, E
作者: 鷹頭貓    時(shí)間: 2019-10-16 11:12
我也一直在想分開這個(gè)文件名，用宏還是要多點(diǎn)一次運(yùn)行宏
作者: cool44    時(shí)間: 2019-10-16 13:33
圖號(hào)分離宏。
7 W' n1 M" L  c) }! ~- B, G想自動(dòng)更新要再加上常駐宏，缺點(diǎn)是占用內(nèi)存多，軟件會(huì)變慢。
作者: pp3711962    時(shí)間: 2019-10-16 13:36
cool44 發(fā)表于 2019-10-16 13:333 p- r+ L6 v. `3 h% c
圖號(hào)分離宏。7 d* R1 y0 ]5 c$ c& Y2 _* V
想自動(dòng)更新要再加上常駐宏，缺點(diǎn)是占用內(nèi)存多，軟件會(huì)變慢。
* p: E# B  D  T. T/ v
所以我想是不是可以改成代碼提取類的，就像excel的公式一樣
( r/ e- K4 i; }1 e4 h: {
作者: 未來第一站    時(shí)間: 2019-10-16 14:39
你這個(gè)是手動(dòng)輸入的吧，做不了屬性鏈接自動(dòng)更改。
作者: 遠(yuǎn)祥    時(shí)間: 2019-10-16 19:40
文件命名也不是很頻繁的操作，其實(shí)手動(dòng)改改靠譜一些。
作者: 西獨(dú)歐陽(yáng)風(fēng)XJB    時(shí)間: 2019-10-17 12:42
學(xué)習(xí)一下  每次手動(dòng)更改確實(shí)煩死
作者: 家鄉(xiāng)的土    時(shí)間: 2019-10-27 20:40
SW2016能用方程式實(shí)現(xiàn)，在網(wǎng)上可以搜到，別的版本的就不知道了
作者: pp3711962    時(shí)間: 2019-10-29 08:13
家鄉(xiāng)的土 發(fā)表于 2019-10-27 20:40) q6 p1 |! X9 I" \! x* }3 E
SW2016能用方程式實(shí)現(xiàn)，在網(wǎng)上可以搜到，別的版本的就不知道了

1 k" L  A$ A! K# f我在網(wǎng)上查過了，應(yīng)該是只能提取全部名稱，并不能零件代號(hào)跟名稱分開
作者: DaveChan    時(shí)間: 2019-10-29 08:22
本帖最后由 DaveChan 于 2019-10-29 08:27 編輯
. X1 K6 Y5 h( A7 X+ Q
4 _4 \$ a  _4 J. Q3 o4 r9 o5 n" f- F用方程式結(jié)合可實(shí)現(xiàn)自動(dòng)更新( T& [, V8 H; |8 J1 g5 |
具體參考以下鏈接
! v& ]% d* b& e# k: r$ {http://www.3dportal.cn/discuz/forum.php?mod=viewthread&tid=1541454&extra=page%3D1
& ?) m  z" V) Y9 h2 a5 \
! t9 ]$ K+ X( i  z0 x8 L4 Q
作者: 紫楓之殤、    時(shí)間: 2020-10-15 14:57
學(xué)習(xí)一下  不要每次都手動(dòng)更改
作者: 暖陽(yáng)暖陽(yáng)    時(shí)間: 2021-4-8 12:32
學(xué)習(xí)了
作者: 思想火炬    時(shí)間: 2021-4-22 14:18
解決了嗎
作者: pp3711962    時(shí)間: 2022-3-21 22:57
思想火炬 發(fā)表于 2021-4-22 14:18
3 |1 J* C9 a: I  f+ l2 ]解決了嗎
6 A# [' x- b: Q! |
解決了，需要增加代碼就可以了& E! M0 H# e. F+ @* b2 D: h
文件名命名格式（代號(hào) 名稱）代號(hào)及名稱中間有個(gè)空格，此代碼以空格為間隔點(diǎn)，如果不帶空格，那會(huì)全部顯示成名稱。
3 ~$ ~- Y/ I7 I( n" Y& U. ~- c: \) e! Y
以下是零件代碼. A" B7 G' U( z' a  |$ T# l
名稱代碼：Part.Extension.CustomPropertyManager("").Set("名稱",Right(Part.GetTitle,Len(Part.GetTitle)-InStr(Part.GetTitle," ")% {: ]' X6 }3 L5 Z3 w& s6 G
代號(hào)代碼：Part.Extension.CustomPropertyManager("").Set("代號(hào)",Left(Part.GetTitle,InStr(Part.GetTitle," ")))
+ [: m6 d. x# L" F9 i; e"Dummy1"：= "名稱代碼"+ S6 E( k3 l& h& k$ K6 h5 k
"Dummy2"：= "代號(hào)代碼"
8 H1 |( ^( K. J# j; R, _（其中（Dummy1），（Dummy2）及（名稱代碼），（代號(hào)代碼）可隨意，保證上下一致即可。）
, c. m& B( e8 N9 J/ w+ A' J' C, l
. w1 F% F9 A; L7 X8 x) d
' y3 w* g* e; Y8 Z1 H5 \& X. l" f

5 t% M) B2 j7 h: r" |/ `. t- L8 ~
: }" e6 a% `8 R4 q" r
& `, z* p' _7 g" _0 z" @

1 e" F3 Z$ m0 u+ e, H' p: ]/ x* A- Q$ R  U9 ^
( i$ J( L7 g5 D# V; p

4 D  l6 L) n4 x
: _( _$ J. k  T9 h: X* w( }% ^以下是裝配體代碼% W% v3 q2 \0 O. v) N& A
名稱代碼：Assembly.Extension.CustomPropertyManager("").Set("名稱",Right(Assembly.GetTitle,Len(Assembly.GetTitle)-InStr(Assembly.GetTitle," ")))9 U' D2 B) V$ p3 i0 }, k: z! l
代號(hào)代碼：Assembly.Extension.CustomPropertyManager("").Set("代號(hào)",Left(Assembly.GetTitle,InStr(Assembly.GetTitle," ")))
7 z% v3 |6 X  z: D- N
  G: {* I9 t8 I( |3 K+ V3 ]"Dummy1"：= "名稱代碼"
9 x* y2 I9 Q8 u3 f, G- T"Dummy2"：= "代號(hào)代碼"  G" [0 L$ W# M8 S8 ?  a
（其中（Dummy1），（Dummy2）及（名稱代碼），（代號(hào)代碼）可隨意，保證上下一致即可。）% ~" N, f! ?/ v1 g# @
. A" g8 Y3 g& _6 s  P
  k" ^5 k" l2 ?& @3 {1 O& ^

7 O- E0 P+ E7 G1 m& l0 h0 Q; c; M
. Z3 ^; Z3 o3 g
7 Y+ f3 J0 n, M8 b- S
作者: pp3711962    時(shí)間: 2022-3-21 23:48
以解決，具體可看附件，附件為模板文件，有需要的可以下載。
5 h2 ~2 [2 _6 r" r9 v$ }0 {# Q   C, \- J8 P, s7 H7 e
[attach]531634[/attach]% |( M$ L  |6 t2 {& x# Z* D+ e. T

/ _  s% }' i. I* ^[attach]531635[/attach]$ M# k  k' L) o& T6 [! \) U8 K
4 z- o& |$ E5 d5 o$ c8 m7 e7 K  i
[attach]531636[/attach]
% F5 X2 X1 E5 y+ B# `! K+ {* I( q+ c2 C. }2 d; J* R
[attach]531637[/attach]; c0 Y3 X$ l. c: C. U% q, n
3 p9 u' b4 b9 {- l

) a6 I9 \+ b/ L
0 L0 ]  c. ]" E( A4 F1 c$ ?8 d/ n% i- \: i) h

. x/ Q) v9 {7 e  \
作者: ccc2006    時(shí)間: 2022-3-28 22:08
學(xué)習(xí)一下
作者: 妖洞兩拐    時(shí)間: 2022-4-13 18:21
家鄉(xiāng)的土 發(fā)表于 2019-10-27 20:40
! A5 G  i1 N  |9 M" {SW2016能用方程式實(shí)現(xiàn)，在網(wǎng)上可以搜到，別的版本的就不知道了

6 {( s3 _! v4 u! z有具體方法嗎？我想學(xué)習(xí)一下，謝謝3 }, O8 h' d+ k  n& ~- m% e
作者: 學(xué)無止境127    時(shí)間: 2023-1-11 13:40
太好了，正需要，謝謝樓主分享
作者: 學(xué)無止境127    時(shí)間: 2023-1-11 13:41
正需要，謝謝樓主無私分享
作者: 學(xué)無止境127    時(shí)間: 2023-1-11 20:08
我按樓主的方法試了，沒成功，不知錯(cuò)在哪里？請(qǐng)大家看一下；另外有試成功的嗎
作者: 學(xué)無止境127    時(shí)間: 2023-1-11 20:11
我按樓主的方法試了，沒成功，不知道錯(cuò)在哪里？大家有應(yīng)用成功的嗎？
作者: leiwi1130    時(shí)間: 2023-3-20 13:44
感謝樓主分享，正需要
作者: leiwi1130    時(shí)間: 2023-3-20 13:45
感謝樓主分享，正需要
作者: leiwi1130    時(shí)間: 2023-3-20 13:48
謝謝樓主無私分享,正需要
作者: leiwi1130    時(shí)間: 2023-3-20 13:51
謝謝樓主無私分享正需要
作者: 單荇道    時(shí)間: 2023-8-3 10:32
有沒有弄成功的？
作者: 攻城獅11    時(shí)間: 2023-12-3 13:19
好好學(xué)習(xí)呀呀
作者: pp3711962    時(shí)間: 2024-5-7 10:24
目前我已經(jīng)測(cè)試成功，文件名命名格式，代碼+空格+名稱。例：2532532 鋼板& u/ v+ W8 q8 ~: B7 W. ~
零件代碼：3 t% W$ d- R' i' t( {
名稱代碼：Part.Extension.CustomPropertyManager("").Set("名稱",Right(Part.GetTitle,Len(Part.GetTitle)-InStr(Part.GetTitle," ")))& ?  c) ]& M5 l  C; M/ g  s- G
代號(hào)代碼：Part.Extension.CustomPropertyManager("").Set("代號(hào)",Left(Part.GetTitle,InStr(Part.GetTitle," ")))
2 t( Y/ S) z( u8 G2 O# {2 V* p裝配體代碼：
* U$ \1 I0 z$ u/ r" m* `3 A* i名稱代碼：Assembly.Extension.CustomPropertyManager("").Set("名稱",Right(Assembly.GetTitle,Len(Assembly.GetTitle)-InStr(Assembly.GetTitle," ")))
# e1 A. a. D3 T+ P3 d/ Y/ o" q  G+ r( o1 e代號(hào)代碼：Assembly.Extension.CustomPropertyManager("").Set("代號(hào)",Left(Assembly.GetTitle,InStr(Assembly.GetTitle," ")))/ Z; y  Y! T6 I& B1 k9 B
方程式設(shè)置如圖
7 m) k1 _7 l7 p# {, w1 M文件屬性自定義如圖+ M0 y0 ^' M9 {" {: Z7 e

/ C3 T* I; v# X1 E注意，代碼需要刷新后才能正確運(yùn)行，自定義內(nèi)需提前添加“名稱”、“代號(hào)”兩個(gè)屬性
: V1 D* i+ [: y. b2 G6 X) V' k
作者: pp3711962    時(shí)間: 2024-5-7 10:26
目前我已經(jīng)測(cè)試成功，文件名命名格式，代碼+空格+名稱。例：2532532 鋼板# m0 @& e( V5 H
零件代碼：( `* |: U( a6 q: A4 {- x6 n
名稱代碼：Part.Extension.CustomPropertyManager("").Set("名稱",Right(Part.GetTitle,Len(Part.GetTitle)-InStr(Part.GetTitle," "))), R. _  w! g6 h$ m+ r3 l! Q* n# ~7 o& A
代號(hào)代碼：Part.Extension.CustomPropertyManager("").Set("代號(hào)",Left(Part.GetTitle,InStr(Part.GetTitle," ")))$ }7 P% B; A- F+ \; S3 G5 C* y1 d
裝配體代碼：
' @! t; K% c; j名稱代碼：Assembly.Extension.CustomPropertyManager("").Set("名稱",Right(Assembly.GetTitle,Len(Assembly.GetTitle)-InStr(Assembly.GetTitle," ")))0 t, u0 f  e% X3 a
代號(hào)代碼：Assembly.Extension.CustomPropertyManager("").Set("代號(hào)",Left(Assembly.GetTitle,InStr(Assembly.GetTitle," ")))
7 s7 G) u) U, D1 I; {( S方程式設(shè)置如圖% y& g) D/ u7 I+ U# V5 L! P& t
文件屬性自定義如圖1 I9 b5 z3 [) O% V, g' w
! _4 X' {1 f8 `+ F7 ~
注意，代碼需要刷新后才能正確運(yùn)行，自定義內(nèi)需提前添加“名稱”、“代號(hào)”兩個(gè)屬性2 h( u8 K4 q" `& ~$ b7 u
作者: pp3711962    時(shí)間: 2024-5-7 10:29
pp3711962 發(fā)表于 2024-5-7 10:26
9 j. }) O* s8 g1 Z2 Y目前我已經(jīng)測(cè)試成功，文件名命名格式，代碼+空格+名稱。例：2532532 鋼板  I1 x- m0 s6 K. P; M) B6 Q
零件代碼：
, d: C' N& |' s7 ~名稱代碼：Part.Ext ...

4 @! `% c+ g' o- ^) G8 R: V7 M2 s. P2 W3 U( c
作者: Yango    時(shí)間: 2024-5-15 11:07
感謝樓主分享



歡迎光臨 機(jī)械社區(qū) (http://www.mg7058.com/) Powered by Discuz! X3.4