MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

2 participantes

    Consulta referencia cruzada com TOP 10

    avatar
    elizeufarias
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 20/12/2011

    Consulta referencia cruzada com TOP 10 Empty Consulta referencia cruzada com TOP 10

    Mensagem  elizeufarias 9/6/2022, 03:11

    Boa noite

    Como adaptar esse código para mostrar os TOP 10 Operadores que mais se repetem?

               strCriterio = "TRANSFORM Count(Operador) AS TOperador"
               strCriterio = strCriterio & " SELECT Operador"
               strCriterio = strCriterio & " From A"
               strCriterio = strCriterio & " GROUP BY Operador"
               strCriterio = strCriterio & " PIVOT Format([DtData],'mmm') In ('jan','fev','mar','abr','mai','jun','jul','ago','set','out','nov','dez');"
             
    Desde já agradeço
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2605
    Registrado : 13/12/2016

    Consulta referencia cruzada com TOP 10 Empty Re: Consulta referencia cruzada com TOP 10

    Mensagem  Alexandre Fim 9/6/2022, 12:42

    Bom dia,

    Seja bem-vindo ao forum.

    Tente isso:

    Código:


              strCriterio = "TRANSFORM Count(Operador) AS TOperador"
              strCriterio = strCriterio & " SELECT TOP 10 Operador"
              strCriterio = strCriterio & " From A"
              strCriterio = strCriterio & " GROUP BY Operador"
              strCriterio = strCriterio & " PIVOT Format([DtData],'mmm') In ('jan','fev','mar','abr','mai','jun','jul','ago','set','out','nov','dez');"


    Att,
    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    Consulta referencia cruzada com TOP 10 Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    elizeufarias
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2
    Registrado : 20/12/2011

    Consulta referencia cruzada com TOP 10 Empty Re: Consulta referencia cruzada com TOP 10

    Mensagem  elizeufarias 10/6/2022, 20:33


    Obrigado Alexandre pela resposta

    Porem mostra todos os registros e não apenas as 10 empresas com mais ocorrências

      Data/hora atual: 6/10/2022, 08:04