Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Uma coleção das áreas (ou seja, blocos contíguos de células) em uma seleção.
Comentários
Não há nenhum objeto de Área singular; os membros individuais da coleção Áreas são objetos de Intervalo . A coleção Areas contém um objeto Range para cada intervalo de células contíguo individual na seleção. Se a seleção contiver somente uma área, a coleção Areas conterá um único objeto Range correspondente a essa seleção.
Exemplo
Utilize a propriedade Áreas do objeto Intervalo para devolver a coleção Áreas . O exemplo a seguir limpa a seleção atual se ela contiver mais do que uma área.
If Selection.Areas.Count <> 1 Then Selection.Clear
Utilize Áreas (índice), em que o índice é o número do índice de área, para devolver um único objeto Intervalo da coleção. Os números de índice correspondem à ordem em que as áreas foram selecionadas. O exemplo a seguir 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 executadas em mais do que uma área numa seleção ao mesmo tempo; tem de percorrer as áreas individuais na seleção e realizar as operações em cada área separadamente. O exemplo seguinte executa a operação com o nome myOperation no intervalo selecionado se a seleção contiver apenas uma área; Se a seleção contiver várias áreas, o exemplo efetua myOperation em cada área individual na 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
Propriedades
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.