使用API在SOLIDWORKS模型中暂停重建操作的宏
该宏使用SOLIDWORKS API来暂停零件、装配体和图纸的重建操作,以提高性能。
当宏启动时,将显示一个窗体。在窗体打开期间,所有重建操作(重新生成)都将被暂停。 例如,直到点击退出暂停重建模式按钮之前,尺寸更改或配合关系都不会解决。
主模块
Sub main()
FreezeRebuildForm.Show vbModeless
End Sub
用户窗体
Const CANCEL_REGEN As Long = 1
Dim swApp As SldWorks.SldWorks
Dim WithEvents swPart As SldWorks.PartDoc
Dim WithEvents swAssy As SldWorks.AssemblyDoc
Dim WithEvents swDraw As SldWorks.DrawingDoc
Private Sub btnExit_Click()
End
End Sub
Private Sub UserForm_Initialize()
Set swApp = Application.SldWorks
Dim swModel As SldWorks.ModelDoc2
Set swModel = swApp.ActiveDoc
If Not swModel Is Nothing Then
Select Case swModel.GetType()
Case swDocumentTypes_e.swDocPART
Set swPart = swModel
Case swDocumentTypes_e.swDocASSEMBLY
Set swAssy = swModel
Case swDocumentTypes_e.swDocDRAWING
Set swDraw = swModel
End Select
Else
MsgBox "请打开模型"
End
End If
End Sub
Private Function swAssy_RegenNotify() As Long
swAssy_RegenNotify = CANCEL_REGEN
End Function
Private Function swDraw_RegenNotify() As Long
swDraw_RegenNotify = CANCEL_REGEN
End Function
Private Function swPart_RegenNotify() As Long
swPart_RegenNotify = CANCEL_REGEN
End Function