Partilhar via


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.