Função Vba Semelhante A Cont.se

[Guest --joragen --]

E ai mano, tido bem?

Cara, venho pedir um help pra vocês.

Pesquisei pacas e ainda estou pesquisando, mas até agora não achei a resposta.

Estou criando uma plan no Ex e gostaria de inserir uma modulo VBA com a mesma função do Cont.SE, com o diferencial de eu pudesse inserir diferentes intervalos de células (10, 20, 30...), mediante um ou mais critérios para contar células com valores.

Desde já agradeço.

Sucesso.

Joragen

[RenatoMejias]

Creio que um laço e uma condição fazendo o check com cada linha atenderia suas necessidades:

For i=i to 100
  if Range("A" & i).Value >5 then
    cont=cont+1
  EndIf
Next

Obs: Não testei o código.