none
Ajuda dos deuses do Excel. RRS feed

  • Pergunta

  • Tenho uma planilha que eu gostaria de ver de quanto em quanto tempo ocorre um determinado numero (para ser bem exato de quanto em quanto tempo o Nº x e sorteado)

     

     Ex: A baixo

    O numero 2 saiu no primeiro concurso depois voltou a sair no concurso quatro assim por diante.

    Na coluna R gostaria de uma função para mostrar estes números de concursos em que um determinado numero ocorreu.

    Espero que vcs entendam minha explicação tentei varias formulas mais não obtive o resultado que queria tentei (ÍNDICI,CORRESP,PROCV)mais nenhuma foi satisfatória, não sou muito bom em organizar as formulas para obter um resultado mais vou entender se alguém conseguir montar alguma para mim.

    Desde já agradeço a todos.

     


    PerSUL
    • Movido AndreAlvesLima quarta-feira, 14 de dezembro de 2011 21:41 (De:Certificação Microsoft - Geral)
    quarta-feira, 14 de dezembro de 2011 20:33

Respostas

  • http://felipebenza.wordpress.com/como_disponibilizar_um_arquivo/
    Felipe Costa Gualberto - http://www.ambienteoffice.com.br
    • Marcado como Resposta Richard Juhasz sexta-feira, 16 de dezembro de 2011 19:11
    sexta-feira, 16 de dezembro de 2011 00:21
  • A rotina abaixo deve demorar uns 3 minutos para executar:

    Sub Exemplo()

        Dim rngBanco As Range

        Dim r As Long

        Dim rngLinha As Range

     

        Set rngBanco = Range("B10:P705")

     

        For r = 1 To 25

            Range("R10").Offset(r - 1) = r

            For Each rngLinha In rngBanco.Rows

                If WorksheetFunction.CountIf(rngLinha, r) = 1 Then

                    Cells(9 + r, Columns.Count).End(xlToLeft).Offset(, 1) = Cells(rngLinha.Row, "A")

                End If

            Next rngLinha

            DoEvents

        Next r

     

    End Sub


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br
    • Marcado como Resposta PerSUL segunda-feira, 19 de dezembro de 2011 11:03
    segunda-feira, 19 de dezembro de 2011 01:30

Todas as Respostas

  • Prezado(a),
    Estou migrando seu post para o fórum de Office Geral.
    Por favor, das próximas vezes que tiver alguma dúvida relacionada a esse assunto, poste por lá.
    Obrigado.

    André Alves de Lima
    Microsoft MVP - Client App Dev
    Visite o meu site: http://www.andrealveslima.com.br
    Me siga no Twitter: @andrealveslima
    quarta-feira, 14 de dezembro de 2011 21:40
  • Olá,

    Poderia disponibilizar a tabela acima para download para que eu escreva uma rotina?


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br
    quinta-feira, 15 de dezembro de 2011 20:49
  • Meu camarada como que disponibilizo para vc a planilha?

     


    PerSUL
    quinta-feira, 15 de dezembro de 2011 23:32
  • http://felipebenza.wordpress.com/como_disponibilizar_um_arquivo/
    Felipe Costa Gualberto - http://www.ambienteoffice.com.br
    • Marcado como Resposta Richard Juhasz sexta-feira, 16 de dezembro de 2011 19:11
    sexta-feira, 16 de dezembro de 2011 00:21
  • Ta na mão o Link para baixo o arquivo,

    http://www.megaupload.com/?d=FUMQWQQX


    PerSUL
    sábado, 17 de dezembro de 2011 01:43
  • Na Planilha que você me enviou, experimente povoar as células:

    A4 = 1

    B4 = 2

    C4 = 3

    D4 = 4

    e assim por diante até Y4 = 25

    Daí, escreva a fórmula em A5:

    =CONT.SE($A$10:$P$705;A4)/CONT.VALORES($A$10:$P$705)

    Formate esta célula como porcentagem (selecione-a, pressione Ctrl+1 e na aba Número, selecione Porcentagem).

    Daí, arraste essa fórmula até Y5.

    Ajuste o tamanho das colunas para visualizar o número.


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br
    domingo, 18 de dezembro de 2011 16:26
  • fico muito feliz pela tua ajuda........mais ainda não e bem isto que preciso, tenho que identificar de quanto em quanto tempo um determinado numero e sorteado este analise vai nortear outros analises que eu já tenho.

    Bem vou tentar explicar, exemplo com o numero 2 este numero foi sorteado no concurso 10 e depois ocorreu novamente sortear do numero 2 no concurso 14 e depois15 no 18 , 30, 35, 48 ,50 assim por diante, como são vários números para identificar fica difícil fazer sem uma condição.

      Benzadeus,

    Espero que eu tenha colocado minha ideia bem clara, mais deus de já agradeço seu empenho em me ajudar e ajudar dos que passem pelo Forum........Valeu obrigado.        


    PerSUL
    domingo, 18 de dezembro de 2011 17:51
  • A rotina abaixo deve demorar uns 3 minutos para executar:

    Sub Exemplo()

        Dim rngBanco As Range

        Dim r As Long

        Dim rngLinha As Range

     

        Set rngBanco = Range("B10:P705")

     

        For r = 1 To 25

            Range("R10").Offset(r - 1) = r

            For Each rngLinha In rngBanco.Rows

                If WorksheetFunction.CountIf(rngLinha, r) = 1 Then

                    Cells(9 + r, Columns.Count).End(xlToLeft).Offset(, 1) = Cells(rngLinha.Row, "A")

                End If

            Next rngLinha

            DoEvents

        Next r

     

    End Sub


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br
    • Marcado como Resposta PerSUL segunda-feira, 19 de dezembro de 2011 11:03
    segunda-feira, 19 de dezembro de 2011 01:30
  • Ptz.....Valeu muito obrigado, isto mesmo que eu estava precisando.Fico devendo esta a vc um abração do tamanho do Rio Grande do Sul.

     


    PerSUL
    segunda-feira, 19 de dezembro de 2011 11:03