Vba: como contar linhas na seleção

Você pode usar os seguintes métodos para contar o número de linhas em uma seleção usando VBA:

Método 1: conte as linhas na seleção e exiba o número na caixa de mensagem

 SubCountRowsInSelection ()

MsgBox Selection.Rows.Count

End Sub

Este exemplo específico conta o número de linhas na seleção atual e depois exibe esse número em uma caixa de mensagem.

Método 2: conte as linhas na seleção e exiba o número em uma célula específica

 SubCountRowsInSelection ()

Range("E1").Value = Selection.Rows.Count

End Sub

Este exemplo específico conta o número de linhas na seleção atual e exibe esse número na célula E1 .

Os exemplos a seguir mostram como usar cada método na prática.

Exemplo 1: conte as linhas na seleção e exiba o número na caixa de mensagem

Suponha que selecionemos o intervalo de células A1:C17 em nossa planilha:

Podemos criar a seguinte macro para contar o número de linhas na seleção e exibir os resultados em uma caixa de mensagem:

 SubCountRowsInSelection ()

MsgBox Selection.Rows.Count

End Sub

Quando executamos esta macro, recebemos a seguinte saída:

A caixa de mensagem informa que existem 17 linhas na seleção atual.

Exemplo 2: conte as linhas na seleção e exiba o número em uma célula específica

Suponha que selecionemos o intervalo de células A4:D9 em nossa planilha:

Podemos criar a seguinte macro para contar o número de linhas na seleção e exibir os resultados na célula E1 :

 SubCountRowsInSelection ()

Range("E1").Value = Selection.Rows.Count

End Sub

Quando executamos esta macro, recebemos a seguinte saída:

A célula E1 nos informa que existem 6 linhas na seleção atual.

Recursos adicionais

Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:

Como contar linhas em uma tabela usando VBA
Como contar células com texto específico usando VBA
Como contar valores únicos no intervalo usando VBA