将通用表格插入工程图 Solidworks 宏

问题描述

我有一个用户需要轻松访问宏的下拉列表，这些宏可以轻松快速地导入通用表格模板，并让他们通过单击光标将其放置在需要的位置。目前，我用于导入通用表的代码有效，但我对solidworks 参数不够熟悉，无法知道要传递哪个参数以允许将表粘贴到用户选择的位置。有问题的具体行是 Set swTable = swDrawing.InsertTableAnnotation2(True,swBOMConfigurationAnchor_TopLeft,MATABLE,2,1)

完整代码如下；

Option Explicit

Dim swApp As SldWorks.SldWorks

Dim swModel As SldWorks.ModelDoc2

Dim swDrawing As SldWorks.DrawingDoc

Dim swTable As SldWorks.TableAnnotation

Const MATABLE As String = "C:\STANDARD Tables\sampleTable.sldtbt"

Sub main()

Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc

If (swModel Is Nothing) Or (swModel.GetType <> swDocDRAWING) Then

swApp.SendMsgToUser ("To be used for drawings only,Open a drawing first and then TRY!")

Exit Sub

End If

Set swDrawing = swModel


Set swTable = swDrawing.InsertTableAnnotation2(True,1)

If Not swTable Is Nothing Then
   swTable.BorderLineWeight = 0
   swTable.GridLineWeight = 0

End If

End Sub

谢谢。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

solidworks