HasArray Property Example

This example displays a message if the active cell on Sheet1 is part of an array.

Worksheets("Sheet1").Activate
If ActiveCell.HasArray =True Then
    MsgBox "The active cell is part of an array"
End If