MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Compartilhe

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 10/09/2013

    [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  formiga10x em Ter 20 Maio 2014, 2:09 pm

    Boa tarde Fórum.
    Surgiu uma dúvida até porque nunca fiz e venho pedir a ajuda dos membros do fórum para dirimir minhas dúvidas.

    Gostaria de ao selecionar entre datas filtrasse  no form os 10 produtos mais vendidos por período e os clientes que mais compraram por período também. Ambos buscando da consulta.

    PS. Fiz um exemplo dos form utilizando textbox porém, acho mais viável e fácil utilizar uma listbox.

    Desde já agradeço e tenham um final de tarde abençoado.

    Grato por tudo que já fizeram por mim...

    Elias.
    Anexos
    clientes.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (70 Kb) Baixado 28 vez(es)

    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3236
    Registrado : 20/04/2011

    Re: [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  Silvio em Ter 20 Maio 2014, 2:51 pm

    Boa tarde Elias....
    Uma ideia....utilize uma instrução em SQL:

    select top 10 Name, Price
    from MyTable
    order by Price desc


    na tua consulta (uma para cliente e outra para produtos). Crie dois formulários contínuos baseados nessas consultas, um para top 10 cliente e outro para top 10 produtos.
    Depois crie um formulário desvinculados para colocar as txt´s onde irão as datas inicial e final e um botão de ação para abrir o formulário onde estarão sendo filtrados os clientes top10 e outro do mesmo modo para os top10 produtos.

    Qualquer coisa...é só gritar.

    Sucesso.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 10/09/2013

    Re: [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  formiga10x em Ter 20 Maio 2014, 3:13 pm

    Blz vou fazer aqui Smile

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 10/09/2013

    Re: [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  formiga10x em Ter 20 Maio 2014, 3:34 pm

    Ficou Show Very Happy
    Mas como seria caso fosse filtrar top 10 entre datas?

    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3236
    Registrado : 20/04/2011

    Re: [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  Silvio em Ter 20 Maio 2014, 3:47 pm

    na consulta coloque como critério, no campo datadavenda:

    entre forms!nomeformulário!nocaixadetextodatainicial e forms!nomeformulário!nocaixadetextodatafinal

    no botão, use o comando :docmd.openform"nomedoformulariocontinuo"


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 10/09/2013

    Re: [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  formiga10x em Ter 20 Maio 2014, 4:03 pm

    Showw Feito Very Happy

    Muito agradecido Silvio mais uma vez salvou rsrs

    Abraço amigo.

    Código:
    Private Sub Form_Load()

    Me.lstTo10Clientes.RowSource = "SELECT TOP 10 CVenda.nomeCliente, Sum(CVenda.qtdProduto)" & vbCrLf & _
    "FROM CVenda " & vbCrLf & _
    "GROUP BY CVenda.nomeCliente " & vbCrLf & _
    "ORDER BY Sum(CVenda.qtdProduto) DESC;"

    End Sub

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 10/09/2013

    Re: [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  formiga10x em Ter 20 Maio 2014, 4:04 pm

    Resolvido.

    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3236
    Registrado : 20/04/2011

    Re: [Resolvido]Os 10 + Clientes e Produtos Vendidos por período:

    Mensagem  Silvio em Ter 20 Maio 2014, 5:58 pm

    Valeu.....
    O fórum agradece o retorno.
    Sucesso.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: Qui 08 Dez 2016, 9:09 am