soilidworks 图层设置宏总不成功

arter_2006

鄙人录制的图层设置宏总不成功，但录制的别的宏就可以，哪位高手能否指点下？非常感谢！


5 L( T0 U1 \# f! K7 V7 O' ******************************************************************************
5 J8 ^9 g$ I# g+ V# I; W, cDim swApp As Object
- m/ D! l, n1 ?' ]" f. a* O
$ |' f: i9 h% R$ ^Dim Part As Object
3 Q: d* l: U0 n/ q1 rDim boolstatus As Boolean
& Q- e4 S* y0 C6 J* EDim longstatus As Long, longwarnings As Long
* o* Q- `: z1 X+ q% R
Sub main()
9 Q9 C/ }, y& v, T: p4 ~
2 }/ g  F6 }3 v( G1 C' xSet swApp = Application.SldWorks
( M7 L, a; i; J. j; \0 D
Set Part = swApp.ActiveDoc

' Zoom To Fit
Part.ViewZoomtofit2

' Zoom To Fit
+ g9 L+ z' M) X+ s% J  ?Part.ViewZoomtofit2

' Zoom To Fit
Part.ViewZoomtofit2

+ y, P' s2 ^# }' Save
7 w6 M) H# l3 t5 mDim swErrors As Long
: A% `: |$ y2 @8 DDim swWarnings As Long
3 G! M5 v( \5 \boolstatus = Part.Save3(1, swErrors, swWarnings)
0 ?* I' \( `0 z1 i3 ]2 eEnd Sub
1 t8 [5 |) @! F9 x/ y

4 L& \  h# n% T- a* A4 e

7 G# Y/ ~0 u8 y# u1 L) R

冷月梧桐

图层问题，明明可以把模板设置好就可以的了，为啥要多走弯路？？

2011ayoon

虽然不太懂，但是怎么看里面也不像有设置图层的语法

远祥

软件有问题了吧！