Notifications
Clear all

ContarValores Visiveis

5 Posts
1 Usuários
0 Reactions
1,816 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde , encontrei uma função no forum msdn que conta celulas preenchidas ,de autoria do Evangelista Lion , gostaria de saber se da para adapta-la para que conte somente as celulas visiveis e não repetidas .

Function ContaLinhas(area As Range) As Long
Dim celula As Range, TotalLinhas As Long
TotalLinhas = 0
For Each celula In area
If celula <> "" Then
TotalLinhas = TotalLinhas + 1
End If
Next
ContaLinhas = TotalLinhas
End Function

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 01/12/2010 1:16 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite Oscar,

Tem que ser através de VBA?

A Função SUBTOTAL resolveria seu problema com relação a contar os valores não ocultos.
Porém, você deverá usá-la com a variavel 'Núm_Função' com o valor 103 pois esse ignora os valores ocultos.

Ficaria assim:

=SUBTOTAL(103;A2:A21)

Com relação a contar os valores únicos (que não repetem), temos uma forma de fazer sem usar VBA, porém, teremos que adicionar uma coluna auxiliar. Há como adicinar uma coluna auxiliar na sua planilha? Pode oculta-la depois.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 02/01/2011 6:12 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Obrigado Helbert Campos
desculpe o atraso no agradecimento.
Um abraço e mais uma vez obrigado

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 09/01/2011 8:56 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Oscar acredito que o Tópico abaixo será de grande ajuda, tem vários exemplos disponilbilizado pelo leonardo:

PROCV com varios resultados
viewtopic.php?f=28&t=239

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 09/01/2011 9:43 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Obrigado Helbert Campos
desculpe o atraso no agradecimento.
Um abraço e mais uma vez obrigado

por nada! :D

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/01/2011 2:07 pm