Como Usar a Função CountA no VBA

Como Usar a Função CountA no VBA

Você que já tem aptidão com as funções do Excel, provavelmente conhece a função CONT.VALORES. Essa função serve para contar qualquer tipo de conteúdo existente nas células da planilha. Então usar a função CountA no VBA pode ser muito útil.

Essa mesma função que também existe no ambiente do VBA, também conta o conteúdos dentro das células da planilha. No entanto, o nome da função é referenciado de outra forma, ela é conhecida como: “CountA”.

Ensinaremos passo a passo como informar essa função dentro do módulo do VBA e contar uma série de dados dentro da planilha.

Como Criar Várias Guias no Excel Com VBA

Baixe a planilha para praticar o que foi ensinado neste tutorial:

Faça Download da planilha abaixo.

Autorizo a coleta e o tratamento dos meus dados para envio de material, inclusive publicidade, e adequação de minha experiência sobre produtos e/ou serviços da NINJA DO EXCEL, conforme informações prestadas AQUI


Como Usar a Função CountA no VBA

Os dados que usaremos de exemplo para contar, são esses:

Usar a Função CountA no VBA

A função CountA é capaz de contar números e textos.

Dentro do módulo do VBA, nosso código ficará assim:

Usar a Função CountA no VBA, módulo

Vejamos mais de perto:

Sub contar()

C = WorksheetFunction.CountA(Range(“B4:B13”))

MsgBox “Total de ” & C & ” Valores”

End Sub


E antes de iniciar esse código, vamos entender resumidamente como ele funciona:

Sub contar(): Inicialização do código, nome definido “contar”. Pode ser qualquer nome de sua preferência;

C = WorksheetFunction.CountA(Range(“B4:B13”)): A letra “C” é uma variável que recebe a função “WorksheetFunction.CountA” e que a função contará dentro do intervalo “Range” de “B4:B13”;

MsgBox “Total de ” & C & ” Valores”: Exibe uma caixa de mensagem, dizendo o total de valores contados no intervalo;

End Sub: Encerramento do código.


E por fim, para iniciar o código, pressione a tecla “F5” dentro do VBA e essa mensagem será exibida:

Usar a Função CountA no VBA, resultado

No caso acima, temos 10 valores de B3 até B13. Porém, também existe possibilidade de contar mais de uma coluna. Nesse caso, ficaria assim:

Tudo que precisamos saber é alterar o “Range”, especificando o intervalo de células da planilha. Confira abaixo:

WorksheetFunction.CountA(Range(“B4:C13”)), de “B4:C13”. Pressionando novamente a tecla “F5”, temos o resultado seguinte:

resultado 2


Curso de Excel Completo: Do Básico ao Avançado.

Quer aprender Excel do Básico ao Avançado passando por Dashboards? Clique na imagem abaixo e saiba mais sobre este Curso de Excel Completo.

Curso de Excel Completo Ninja do Excel

Por fim, deixe seu comentário sobre o que achou, se usar este recurso e você também pode enviar a sua sugestão para os próximos posts.

Até breve!

Artigos Relacionados Ao VBA: