Coleção Areas

Range Areas Range

Uma coleção das áreas, ou blocos contíguos de células, dentro de uma seleção. Não há objeto Area separado; os membros individuais da coleção Areas são objetos Range. A coleção Areas contém um objeto Range para cada intervalo de células contíguo individual dentro da seleção. Se a seleção contiver somente uma área, a coleção Areas conterá um único objeto Range correspondente a essa seleção.

Usar a coleção Areas

Use a propriedade Areas para retornar a coleção Areas. O exemplo seguinte limpa a seleção atual se ela contiver mais do que uma área.

If Selection.Areas.Count <> 1 Then Selection.Clear

Use Areas(index), onde index é a área do número de índice, para retornar um único objeto Range da coleção. Os números de índice correspondem à ordem na qual as áreas foram selecionadas. O exemplo seguinte limpa a primeira área na seleção atual se a seleção contiver mais do que uma área.

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

Algumas operações não podem ser efetuadas em mais de uma área ao mesmo tempo em uma seleção; você precisa efetuar um loop nas áreas individuais na seleção e efetuar as operações em cada área separadamente. O exemplo seguinte efetua a operação chamada "myOperation" no intervalo selecionado se a seleção contiver somente uma área; se a seleção contiver várias áreas, o exemplo efetuará myOperation em cada área individual da seleção.

Set rangeToUse = Selection
If rangeToUse.Areas.Count = 1 Then
    myOperation rangeToUse
Else
    For Each singleArea in rangeToUse.Areas
        myOperation singleArea
    Next
End If