Nota
O acesso a esta página requer autorização. Pode tentar iniciar sessão ou alterar os diretórios.
O acesso a esta página requer autorização. Pode tentar alterar os diretórios.
Retorna um valor Long que representa o número de objetos na coleção.
Sintaxe
expression.Count
expressão Uma variável que representa um objeto de Intervalo.
Comentários
A propriedade Contar é funcionalmente igual à propriedade CountLarge , exceto que a propriedade Contar gerará um erro de capacidade excedida se o intervalo especificado tiver mais de 2.147.483.647 células (menos uma do que 2.048 colunas). No entanto, a propriedade CountLarge pode lidar com intervalos que chegam ao tamanho máximo de uma planilha, que é 17.179.869.184 células.
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.