SOLIDWORKS宏在窗口文件夹中显示所选装配组件
该宏演示了如何使用SOLIDWORKS API在Windows文件资源管理器中打开所选装配中的组件的文件夹。
在打开的窗口中,组件的文件将被预选中。
该宏将产生类似于以下手动步骤的结果:
- 在其自己的窗口中打开组件
- 转到文件菜单
- 从“最近打开的文件”中选择文件
- 选择“在文件夹中显示”选项
{ width=320 height=69 }
如果没有选择任何组件,则将打开活动模型的路径。
观看视频演示
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swSelMgr As SldWorks.SelectionMgr
Dim swComp As SldWorks.Component2
Sub main()
On Error Resume Next
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
If Not swModel Is Nothing Then
Set swSelMgr = swModel.SelectionManager
Set swComp = swSelMgr.GetSelectedObjectsComponent3(1, -1)
Dim path As String
If Not swComp Is Nothing Then
path = swComp.GetPathName
Else
path = swModel.GetPathName
End If
If path <> "" Then
Shell "explorer.exe /select, " & """" & path & """"
Else
MsgBox "模型未保存"
End If
Else
MsgBox "请打开装配文档并选择组件"
End If
End Sub