Item Property (Areas Collection) Example

This example clears the first area in the current selection if the selection contains more than one area.

If Selection.Areas.Count <> 1 Then
    Selection.Areas.Item(1).Clear
End If