通过 Excel 的 eDrawings API

我正在尝试通过 Excel 使用 edrawings VBA api。我已经下载了 edrawings SDK，似乎 api 仅通过用户表单运行。我通过 Excel 为 SolidWorks 制作了一些 VBA 宏，但与 SolidWorks 不同的是，它的文档非常有限。我只是想建立与 API 的连接，之后我应该能够从那里获取它。

现在我只想通过 excel 在 edrawings 中打开一个 Solidworks 绘图。所以像下面这样：

Sub OpenDrawing()

Dim xlBook As Workbook
Dim xlsheet As Worksheet
Dim eDraw As New EModelViewControl
Dim FilePath As String

Set xlBook = ActiveWorkbook
Set xlsheet = xlBook.Sheets(1)

FilePath = Range("B1").Value

eDraw.OpenDoc FilePath, False, False, True, ""

End Sub

例如，范围 B1 为以下“C:\ _EngVault\000S\090\090-40400-01.SLDDRW”。我已经激活了 EModelView2018 类型库并运行 edrawings 2018。同样，一旦我能够弄清楚如何连接到该程序，我应该很好，但我无法做到这一点。

另外，我是否需要为此提供用户表格还是我误解了？

先感谢您，

FFS88

另外，我是否需要为此提供用户表格还是我误解了？

是的，eDrawings API 是 eDrawings 的 OLE 编程接口，并作为 Microsoft ActiveX 控件实现。

因此，您必须将 ActiveX 控件放置在表单上并通过此控件访问 api：

Me.EModelViewControl1.OpenDoc path_to_edrawings_file, False, False, False, ""

正如您从 SOLIDWORKS API 中所知，无法启动新实例或连接到正在运行的实例。