提取配置名稱的宏代碼

醉生夢

各位大俠好：如下代碼，我是想將配名稱提取成字符串
/ D6 V8 e9 t: S  L- N) Z& }dim aaa as string
; \/ o4 C; |9 a) X1 S
Set swApp = Application.SldWorks
Set part = swApp.ActiveDoc
4 I% u  M- V6 X9 m8 l" G$ v6 S
  O6 C  E% F' ~/ F4 L. G! U; f3 Q: naaa = part.GetConfigurationName(0).Name


運行時在第四句上出錯，錯誤提示為：對象不支持該屬性或方法，向各位大俠請教一下應該用什么樣的屬性代碼？
8 [2 E0 `, C8 c4 q0 G- f9 o
謝謝！！
/ h# e) ?$ R" _& k$ Q
% m8 u# s; m" [7 w/ u+ v; v3 ~

ryouss

試試    aaa = part.GetConfigurationName(0).Name   改為如下.  

. n: s* C0 E# p7 \6 }
& P: `9 g1 P$ h  R& r: S$ Yaaa = swApp.ActiveDoc.GetTitle() '取得當前零件的零件名稱
  }3 h" {0 A+ q" Z1 Z  G
7 {* x( L3 ~3 Q* |, c( B) r( G
$ C9 X) n3 n0 D. }# l

醉生夢

ryouss 發表于 2018-5-6 20:21
試試    aaa = part.GetConfigurationName(0).Name   改為如下.  

& R+ |+ H3 l! Y# Q2 U謝謝您，我的本意就是要提取配置的名稱，而不是零件的名稱，現在我的問題已經解決了，但是還是謝謝您！！！

DaveChan

獲取當前激活的配置名稱：
將aaa = part.GetConfigurationName(0).Name更改成
8 u& k! [/ w/ K2 Qaaa = part.GetActiveConfiguration.Name

醉生夢

DaveChan 發表于 2018-5-7 08:31
4 m" C0 a) J+ P獲取當前激活的配置名稱：
將aaa = part.GetConfigurationName(0).Name更改成
9 }8 L7 h1 A+ P0 k% E" z/ Qaaa = part.GetActiveConfi ...

, `5 l# x" V2 _0 G( t1 w" P& Z謝謝，感謝您的回復，經過測試為正解，謝謝！！