Notifications
Clear all

Contar ocorrências

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

Prezados,

tenho uma tabela com várias colunas e linhas preenchidas com números, sendo que esses números podem se repetir várias vezes nesses intervalo de células. Meu objetivo é saber qual as cinco maiores ocorrências de valores. Usando a função MODO descobri a maior ocorrência, mas preciso saber qual a segunda, terceira até a quinta maiores ocorrência (quem sabe no futuro eu precise mais que cinco maiores ocorrências).

Desde já agradeço

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

 
Postado : 13/08/2010 4:05 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Supondo que na coluna A voce tenha os seguintes valores

1-100
2-200
3-350
4-400
5-510

Em B1 voce coloca essa fórmula:

=MAIOR(A1:A5;1) na célula B1
=MAIOR(A1:A5;2) na célula B2
=MAIOR(A1:A5;3) na célula B3
=MAIOR(A1:A5;4) na célula B4
=MAIOR(A1:A5;5) na célula B5

Espero ter ajudado...

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

 
Postado : 13/08/2010 8:01 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Segue mais essa........

suponhamos que os numeros estejam na celula a1 até a10. E vc quer saber os 5 maiores.
selecionar as celulas b1 até b5 e digite:

=maior(a1:a10;{1;2;3;4;5})

finalizar com o CTRL + SHIFT + ENTER por se tratar de matricial

Randro

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

 
Postado : 14/08/2010 12:58 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Montei esta UDF para atender ao problema.
Deve ser utilizada como fórmula matricial, sempre em duas linhas e n colunas, para retornar os n valores com maiores frequências e as respectivas frequências.

[ ]s

Option Base 1
'Adaptado a partir de exemplo disponível em:
' http://spreadsheetpage.com/index.php/tip/identifying_unique_values_in_an_array_or_range/

Function ItensÚnicos(ConjuntoValores As Range) As Variant
'   Aceita um intervalo como input
    
    Application.Volatile
    
    Dim ValÚnicos()     As Variant ' Matriz que contém os valores únicos
    Dim Elemento        As Variant
    Dim Transf          As Variant
    Dim i               As Integer
    Dim j               As Integer
    Dim Correspondência As Boolean
    
'   Contador para os valores únicos
    NumValÚnicos = 0
'   Loop através da matriz ou intervalo
    For Each Elemento In ConjuntoValores
        Correspondência = False
'       Verificar se o valor já foi inserido
        For i = 1 To NumValÚnicos
            If Elemento = ValÚnicos(2, i) Then
                Correspondência = True
                Exit For '(Saída do Loop)
            End If
        Next i
AddItem:
'       Caso não esteja na lista, o valor é inserido na matriz
        If Not Correspondência And Not IsEmpty(Elemento) Then
            NumValÚnicos = NumValÚnicos + 1
            ReDim Preserve ValÚnicos(2, NumValÚnicos)
            'Inserção do valor
            ValÚnicos(2, NumValÚnicos) = Elemento
            'Inserção da frequência correspondente
            ValÚnicos(1, NumValÚnicos) = Application.WorksheetFunction.CountIf(ConjuntoValores, Elemento)
        End If
    Next Elemento
    
    
'   Ordenar matriz com base nas frequências
    For i = 1 To NumValÚnicos
        For j = i + 1 To NumValÚnicos
        If ValÚnicos(1, i) <= ValÚnicos(1, j) Then
        Transf = ValÚnicos(1, j)
        ValÚnicos(1, j) = ValÚnicos(1, i)
        ValÚnicos(1, i) = Transf
        End If
        Next j
    Next i

'   Reorganizar a matriz
    For i = 1 To NumValÚnicos
        Transf = ValÚnicos(1, i)
        ValÚnicos(1, i) = ValÚnicos(2, i)
        ValÚnicos(2, i) = Transf
    Next i
      
'   Atribuição de valor para a função
    ItensÚnicos = ValÚnicos
End Function

Eis aqui um exemplo de uso: http://www.4shared.com/file/h8WHpoUE/ContagemMltipla.html

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

 
Postado : 17/08/2010 11:29 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

UM GRANDE DESAFIO PRA MIM
Olá pessoal, muito boa noite, andei olhando os tópicos e vi que todo mundo encontra solução para os seus problemas heheheeh, a mais ou menos uns 3 meses venho quebrando a cabeça com uma planilha aqui, vejam se podem me ajudar: a planilha é o seguinte

DESTINO - Nº DO VOO - ADULT - CRIAN - COLO - BAG - CARGA - CARREGAMENTO
CGH ----------1211 --------- 3 ------- 2 ------ 1 ------50----- 10 ------ CGH/B/50/C/10

Essa parte do CARREGAMENTO não existe, eu queria saber se axiste alguma formula ou algum jeito de fazer com que, após eu alimentar as demais células: DESTINO,Nº DO VOO e etc, a célula referente ao CARREGAMENTO seja alimentada do jeito que eu coloquei ai CGH/B/50/C/10 onde CGH é o destino, B é referente a bagagem, 50 a quantidade de kilos de bagagem, C é referente a carga e 10 a quantidade de carga embarcada, isso tudo sem que seja necessário eu digitar nada dentro da célula do CARREGAMENTO, ou seja, basta eu alimentar as outras informações que a parte do CARREGAMENTO será preenchido automaticamente no formato mostrado acima --}CGH/B/50/C/10 .

Se isso puder ser feito, vocês não tem noção do quanto isso vai ser útil no meu trabalho e para minha empresa como um todo.

Desde já agradeço pela atenção.

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

 
Postado : 16/09/2010 10:52 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Caro José Alberto, Bom Dia.

Supondo que a sua linha de dados do exemplo seja a linha 2, a coluna CARREGAMENTO, estará na coluna H.

Coloque esta fórmula em H2 --> =CONCATENAR(A2&"/B/"&F2&"/C/"&G2)

Era isto que você estava precisando?

Espero ter ajudado.

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

 
Postado : 17/09/2010 7:36 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Caro José Alberto, Bom Dia.

Supondo que a sua linha de dados do exemplo seja a linha 2, a coluna CARREGAMENTO, estará na coluna H.

Coloque esta fórmula em H2 --> =CONCATENAR(A2&"/B/"&F2&"/C/"&G2)

Era isto que você estava precisando?

Espero ter ajudado.

É exatamente isso meu mestre.

Agora me resta outra duvida, e no caso de eu nao preencher o campo referente a bagagem ou a parte referente a carga a planilha podera gerar na parte do CARREGAMENTO o resultado sem a quantidade de bagagem ou sem a quantidade de carga? por exemplo:

eu não tenho carga, então, ao invez de ficar CGH/B/50/C/ ficaria CGH/B/50 (sem o /C/)

eu nao tenho bagagem, então, ao invez de ficar CGH/B//C/10 ficaria CGH/C/10 (sem /B/)

espero que tenha entendido.

Desde já agradeço a ajuda meu amigo

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

 
Postado : 17/09/2010 9:12 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Caro José Alberto, Boa Tarde.

Claro que tem jeito de fazer exatamente o que você precisa.

Basta substituir a fórmula anterior por esta:
=CONCATENAR(A2&SE(F2="";"";"/B/"&F2)&SE(G2="";"";"/C/"&G2))

Espero ter ajudado você em seu trabalho.

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

 
Postado : 17/09/2010 10:07 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Caro José Alberto, Boa Tarde.

Claro que tem jeito de fazer exatamente o que você precisa.

Basta substituir a fórmula anterior por esta:
=CONCATENAR(A2&SE(F2="";"";"/B/"&F2)&SE(G2="";"";"/C/"&G2))

Espero ter ajudado você em seu trabalho.

CARA VOCE É UM GENIO, CARA TO SEM PALAVRAS, ESSA FORMULA VAI REVOLUCIONAR O MEU TRABALHO HEHEHEHEHEH.

MUITO OBRIGADO DE CORAÇÃO AMIGÃO

OTIMO FINAL DE SEMANA PRA VOCE GRANDE AMIGOOOOOOOOOOOOO

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

 
Postado : 17/09/2010 4:03 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Caro José Alberto, Boa Noite.

Fico feliz em saber que ajudei efetivamente você com sua necessidade no trabalho.

Tenha uma òtima e produtiva semana.

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

 
Postado : 18/09/2010 5:53 pm