ArrowHeads.Count property - Developer Area

API Documentation > CorelDRAW > 2022-v24.1 > ArrowHeads > IVGArrowHeads

ArrowHeads.Count property

Gets the number of arrows heads in the collection

Syntax:

Property Get Count() As Long

Remarks:

The Count property returns the number of arrowheads in an ArrowHeads collection.

Examples:

The following VBA example identifies all arrowheads of selected objects that have an index of one and replaces them with arrowheads that have an index equal to the total number of arrowhead objects. This replaces the selected arrowheads with the last arrowhead in the ArrowHeads collection.

Sub Count()
  Dim s As Shape
  Dim Arrow As ArrowHead
  Set Arrow = ArrowHeads(ArrowHeads.Count)
  For Each s In ActiveDocument.Selection.Shapes
    If s.Outline.Type = cdrOutline Then
      With s.Outline
        If .StartArrow.Index = 1 Then
          .StartArrow = Arrow
        End If
        If .EndArrow.Index = 1 Then
          .StartArrow = Arrow
        End If
      End With
    End If
  Next s
End Sub

Version Information:

CorelDRAW:	X7.4, X7, X7.6, X8, 2017, 2018, 2019, 2019.2, 2020, 2021, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25
Corel DESIGNER:	X7, 2017.1, 20.1, 2019.2, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25