获知工程图视图来自装配还是零件

最新推荐文章于 2021-04-30 23:15:31 发布

原创最新推荐文章于 2021-04-30 23:15:31 发布 · 1.5k 阅读

0 ·

CC 4.0 BY-SA版权

工程图专栏收录该内容

24 篇文章

订阅专栏

本文介绍如何使用API获取工程图中视图所引用的模型文档类型，通过VBA示例代码展示了判断当前视图为装配文档或零件文档的方法。

每个工程图视图都会来自某个模型文件，或是转配或是零件。API提供的DrawingView.ReferencedDocumentDescriptor 能返回对应的文档。例如：

Private Sub DrawingRefs()
  
  Dim oDoc As DrawingDocument
  Set oDoc = ThisApplication.ActiveDocument
  Dim oSheet As Sheet
  Set oSheet = oDoc.ActiveSheet
  
  Dim oView As DrawingView
  Set oView = oSheet.DrawingViews.Item(1)

  Dim oRef As DocumentDescriptor
  Set oRef = oView.ReferencedDocumentDescriptor
  
  Select Case oRef.ReferencedDocumentType
    Case DocumentTypeEnum.kAssemblyDocumentObject
      MsgBox "Assembly Document"
    Case DocumentTypeEnum.kPartDocumentObject
      MsgBox "Part Document"
    Case Else
      MsgBox "Document - ???"
  End Select

End Sub