soilidworks 圖層設(shè)置宏總不成功

arter_2006

鄙人錄制的圖層設(shè)置宏總不成功,，但錄制的別的宏就可以,，哪位高手能否指點(diǎn)下,？非常感謝,！


' ******************************************************************************
Dim swApp As Object

Dim Part As Object
Dim boolstatus As Boolean
2 Z( U4 n' h. H4 m# D! v) s# e) yDim longstatus As Long, longwarnings As Long

Sub main()
$ L- W+ }9 e+ K+ y
( F4 f* H9 o2 L7 K! FSet swApp = Application.SldWorks
7 o$ ?% m  Z4 c
Set Part = swApp.ActiveDoc

; N( T) b! R( e  S' Zoom To Fit
Part.ViewZoomtofit2

' Zoom To Fit
Part.ViewZoomtofit2

: ~& q/ x7 |: K* l) k( o+ y7 ]' Zoom To Fit
Part.ViewZoomtofit2
, y* d" ?1 J- Y0 h' W: x( a
' Save
; U& v! |) g3 L5 |: _Dim swErrors As Long
5 O* U& |( [2 ]4 v4 f9 N9 r+ _% X% VDim swWarnings As Long
boolstatus = Part.Save3(1, swErrors, swWarnings)
End Sub




# ^9 f4 q, N0 z. l" j
+ M, Q% z$ I+ H0 a0 L

冷月梧桐

圖層問題,，明明可以把模板設(shè)置好就可以的了，為啥要多走彎路,？,？

2011ayoon

雖然不太懂,，但是怎么看里面也不像有設(shè)置圖層的語法

遠(yuǎn)祥

軟件有問題了吧,！