Propriedade Areas.Count (Excel)
Retorna um valor Long que representa o número de objetos na coleção.
Sintaxe
expressão. Contar
Expressão Uma variável que representa um objeto Areas .
Exemplo
Este exemplo exibe o número de colunas da seleção, na Planilha1. O código também testa se a seleção é de área múltipla; nesse caso, o código fará loop pelas áreas da seleção de múltiplas áreas.
Sub DisplayColumnCount()
Dim iAreaCount As Integer
Dim i As Integer
Worksheets("Sheet1").Activate
iAreaCount = Selection.Areas.Count
If iAreaCount <= 1 Then
MsgBox "The selection contains " & Selection.Columns.Count & " columns."
Else
For i = 1 To iAreaCount
MsgBox "Area " & i & " of the selection contains " & _
Selection.Areas(i).Columns.Count & " columns."
Next i
End If
End Sub
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.