SOLIDWORKS 宏合并執行的問題

arter_2006

2014試過了，和2018一樣。但3個宏各自單獨執行是沒問題的。不知道問題在哪里

ryouss

arter_2006 發表于 2018-11-28 16:45
( a1 N: H9 }1 n) c8 C2014試過了，和2018一樣。但3個宏各自單獨執行是沒問題的。不知道問題在哪里

2012版本 "引用項目" 作參考,看是否有打勾!

' o5 s  n; _) p* Y) e

arter_2006

ryouss 發表于 2018-11-28 17:11
2012版本 "引用項目" 作參考,看是否有打勾!

- z/ l6 I6 o4 O7 u/ T打勾了，只是沒有solidworks 2012的選項，我從上到下都看過了

ryouss

arter_2006 發表于 2018-11-28 18:54
打勾了，只是沒有solidworks 2012的選項，我從上到下都看過了

( u8 E3 m" @9 V/ G, R4 G因是2018版沒2012是正常的.
8 f5 Y' A. h9 q; n+ G4 G
1 j6 J6 b1 @+ h( l9 @2 Q& Y; n另試 "逐步執行" 看程式如何執行!(一搬在抓程式臭蟲就要用到"逐步執行")
  F3 z. C' B( s5 E7 U
3 \* B( a1 u# h; N0 r; m  ^) P

, l, s$ x# ^8 K# W7 f( [7 S+ ]6 f

arter_2006

! r! Q. y" i: l
2018沒有偵錯按鈕，但有“逐語句”按鈕，點了后沒發現任何問題。
* n+ Q" y1 A3 r3 T; `下面是截屏。

arter_2006

又用solidworks 2014試了下，發現問題：

arter_2006

對于solidworks 2014,我試了兩個宏，一個是昨天的宏，及宏的名字為中文名，如”刪除當前配置屬性.swp“，但
"CurCFGname = Part.GetConfigurationNames"
這一句沒有改，
我進行了逐句檢查，沒有發現問題。
6 n$ p+ ~& t* F7 V4 e: t% ^- I后來我把宏的名字改為英文名，但上面的語句改為了
: {' x9 @& T& D7 @( kCurCFGname = swApp.GetConfigurationNames(swApp.ActiveDoc.GetPathName) '補加零件文件的路徑及名稱
- _$ C1 ?% t2 Y) k* n6 J4 Q，執行逐句檢查，沒有再發現問題。
. G+ ^" ?. [% ^1 q  \8 t上面的兩個版本在solidworks 2018，及在sw2014里發現問題的宏，都沒有發現任何問題。
: a( Q+ d/ l$ C1 B& R8 U( W8 L
0 E- q+ m/ t5 v$ C) r7 q$ i補充一點，我剛剛發現，這幾個宏，無論是在sw2014還是2018里，都能夠執行”partitionTM.swp“宏里的內容，但另外兩個宏里的內容都不能起到任何作用，即不能刪除自定義屬性、及所有配置屬性里的內容。

arter_2006

@ryouss,謝謝，讓您費心了。

DaveChan

可使用RunMacro2函數執行外部宏，如下參考

1. Option Explicit
   
2. Dim swApp As SldWorks.SldWorks
   9 S, b: ~- M7 a# h6 Q
3. Dim runMacroError As Long
   
4. 
   ) r8 W$ \& @. v" N2 o
5. Sub main()
   
6.    Set swApp = Application.SldWorks
   6 k" w+ t2 _4 s( Z
7.    swApp.RunMacro2 "C:\Users\Administrator\Desktop\Macros\刪除所有配置屬性.swp", "配置1", "main", 0, runMacroError
   
8.    swApp.RunMacro2 "C:\Users\Administrator\Desktop\Macros\刪除自定義屬性.swp", "配置1", "main", 0, runMacroError
   ! F0 H# }; f3 N
9.    swApp.RunMacro2 "C:\Users\Administrator\Desktop\Macros\partitionTM.swp", "partitionTM1", "main", 0, runMacroError
   ' N0 s- N: n1 u- p: e
10. End Sub
      F% f% X6 V& i7 h) ]  _

復制代碼

arter_2006

DaveChan 發表于 2018-11-30 11:11
可使用RunMacro2函數執行外部宏，如下參考

非常感謝您，成功了
7 V" ?4 i6 ]: C: F  i! P