需要获取solidworks窗口打开的文件名称，用swApp.GetDocumentCount()得到的数量和swApp.GetDocuments()得到的文件都不大对，只要总装打开而零件非轻化状态，零件就会被装入内存(没有单独窗口打开)，会被计入GetDocumentCount()的数量，只需要窗口打开的零件名用什么方法呢？
Option Explicit
Sub main()
Dim swApp As SldWorks.SldWorks
Dim swDoc As SldWorks.ModelDoc2
Dim docCount As Integer
Dim i As Integer
Set swApp = Application.SldWorks
' 获取当前打开的文档数量
docCount = swApp.GetDocumentCount()
MsgBox "当前打开的窗口数目: " & docCount
' 遍历所有打开的文档并输出其名称
For i = 0 To docCount - 1
Set swDoc = swApp.GetDocuments(i)
MsgBox "打开的文件名称: " & swDoc.GetTitle()
Next i
End Sub

最近在网上浏览：看到介绍“SolidWorks装配体随机颜色宏就是那种一键上色的功能，哪位朋友能不能分享一下