讨论：SOLIDWORKS能否把工程图图幅提取到表格

SolidWorks工程图的图幅能否被单独提取出来？比如我若要统计一套图中那些是A2/A3/A4，要怎样操作或者是否有相应的插件工具能实现？

可以通过VBA实现,参考程序:
'获取图幅大小函数

'无输入参数
'返回图幅枚举代码，1-14

Public Function papersize()
    Dim swApp                   As SldWorks.SldWorks
    Dim swDraw                  As SldWorks.DrawingDoc
    Dim swSheet                 As SldWorks.Sheet
    Dim vSheetProps             As Variant
    Dim bFirstAng               As Boolean
    Dim bRet                    As Boolean

    Set swApp = Application.SldWorks
    Set swDraw = swApp.ActiveDoc
    Set swSheet = swDraw.GetCurrentSheet


    ' Get current sheet properties

    vSheetProps = swSheet.GetProperties

    ' Current sheet properties
'
'    Debug.Print "Name = " + swSheet.GetName
'    Debug.Print "  TemplateName              = " & swSheet.GetTemplateName
'    Debug.Print "  PaperSize                 = " & vSheetProps(0)
'    Debug.Print "  TemplateIn                = " & vSheetProps(1)
'    Debug.Print "  Scale1                    = " & vSheetProps(2)
'    Debug.Print "  scale2                    = " & vSheetProps(3)
'    Debug.Print "  FirstAngle                = " & vSheetProps(4)
'    Debug.Print "  Width                     = " & vSheetProps(5)
'    Debug.Print "  Height                    = " & vSheetProps(6)
'

    ' Switch projection property
    '切换第一视角 - true/第三视角 - false
    '注意:该视角切换不会更新已经定义的视角显示方式!!!!
'    bFirstAng = vSheetProps(4)
'    vSheetProps(4) = Not bFirstAng

    ' Apply updated sheet properties

    swSheet.SetProperties _
        vSheetProps(0), _
        vSheetProps(1), _
        vSheetProps(2), _
        vSheetProps(3), _
        vSheetProps(4), _
        vSheetProps(5), _
        vSheetProps(6)

    ' 当前项目属性集合
    'Debug.Print "  New FirstAngle setting    = " & vSheetProps(0)
   
    '函数返回值
    papersize = vSheetProps(0)
End Function

顶  顶顶顶顶顶顶顶顶顶

追风峥奇 发表于 2024-8-1 11:50
可以通过VBA实现,参考程序:
'获取图幅大小函数
...

非常感谢！虽然还不会使用，先学习一下

mark，实用贴，感谢大神

二楼真是大神啊