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