AnsweredAssumed Answered

Get all holes attached to a hole callout dimension

Question asked by Dave Paul on Jun 29, 2015
Latest reply on Jul 1, 2015 by Dave Paul

I need to loop thru all the holes that are attached to a hole callout dimension.  When I get the annotations of the hole callout dimension that is attached to four holes, all holes seem to be one feature.  I need to dig one level deeper and get the individual holes.  All I need is an array of the holes.

 

Here is what I have:

 

   Set swDimension = swSelMgr.GetSelectedObject5(1)
    Select Case swSelMgr.GetSelectedObjectType2(1)
      Case swSelectType_e.swSelDIMENSIONS:
        Debug.Print "Dimension"
        If swDimension.IsHoleCallout Then
          Debug.Print "--> Hole Callout"
          Set swAnnotation = swDimension.GetAnnotation
          Call DisplayDimensionText(swAnnotation, swDimension)
          swEnts = swAnnotation.GetAttachedEntities
          Set swEnts = swEnts.GetAnnotation  <==  I think I need to get the annotations of an annotation to get the individual holes
          vAttEntTypeArr = swAnnotation.GetAttachedEntityTypes
        End If
     End Select

 

All thoughts and ideas are appreciated - Dave

Outcomes