提取配置名称的宏代码

醉生梦

各位大侠好：如下代码，我是想将配名称提取成字符串
# B& L$ ^+ M" ^0 i% r4 sdim aaa as string
7 ~7 P( g# l; O1 `) T$ G( G
! [$ h+ K2 u+ m( n7 ?% ~Set swApp = Application.SldWorks
2 }; i/ y" F" F1 ?7 s( a4 jSet part = swApp.ActiveDoc
) b5 A0 v% `. Q! ~' `" X% ~
aaa = part.GetConfigurationName(0).Name


7 _: ]1 L5 |( x$ M2 `* C运行时在第四句上出错，错误提示为：对象不支持该属性或方法，向各位大侠请教一下应该用什么样的属性代码？

谢谢！！
: z# k" A  H+ Y* N) p3 x3 f; r0 P

醉生梦

DaveChan 发表于 2018-5-7 08:31
获取当前激活的配置名称：
将aaa = part.GetConfigurationName(0).Name更改成
" }8 P$ [- R0 r$ k' caaa = part.GetActiveConfi ...

* W" m5 j5 _" [& k0 f" h- f谢谢，感谢您的回复，经过测试为正解，谢谢！！

DaveChan

获取当前激活的配置名称：
  W7 Y$ T' C1 ]6 v' R* v$ b( u将aaa = part.GetConfigurationName(0).Name更改成
3 M0 s5 ]6 F# a) paaa = part.GetActiveConfiguration.Name
$ T7 w% U- I8 u1 j8 B, G

醉生梦

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

谢谢您，我的本意就是要提取配置的名称，而不是零件的名称，现在我的问题已经解决了，但是还是谢谢您！！！
4 J2 z" s" R2 s1 k* G% z

ryouss

試試    aaa = part.GetConfigurationName(0).Name   改為如下.  
7 L$ X4 s" h0 t+ X; G
( A  A% s) r+ g8 C$ Z9 g* F
aaa = swApp.ActiveDoc.GetTitle() '取得當前零件的零件名稱
, ]* U2 |. o+ B6 y: I' p- ?
% I5 ?) K! M: T7 d* t