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

    GROUP BY SUM

    Compartilhe

    eduardohsantos
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 23/02/2014

    GROUP BY SUM

    Mensagem  eduardohsantos em Dom 23 Fev 2014, 22:09

    Boa noite
    Galera,

    Preciso de ajuda para manipular alguns registros na tabela. Tenho uma tabela como o exemplo:

    Item Qtde
    A 16
    B 12
    C 3
    A 4

    Estou tentando agrupar por Item, somando o campo Qtde para que fique assim:
    Item Qtde
    A 20
    B 12
    C 03

    Mas não estou conseguindo montar uma rotina que realize isso. tentei utilizar um com group by e sum, mas sem sucesso. Podem me ajudar por favor?

    Obrigado desde já; Valeu

    UM DETALHE EU NÃO SEI NADA DE VBA EXCEL, PRECISO DE AJUDA MESMO. MAS SE MOSTRA ALGUM EXEMPLO EU PEGO O JEITO

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Re: GROUP BY SUM

    Mensagem  formiga10x em Dom 23 Fev 2014, 22:17

    Boa noite, Amigo para onde vc gostaria de enviar os valores já somados?

    eduardohsantos
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 23/02/2014

    Re: GROUP BY SUM

    Mensagem  eduardohsantos em Dom 23 Fev 2014, 22:27

    Muito obrigado por ter respondido.  Very Happy Very Happy 

    Dentro da mesma planilha só que em outro plano.

    Dados em Plan1

    Somatoria em Plan2

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Re: GROUP BY SUM

    Mensagem  formiga10x em Dom 23 Fev 2014, 22:30

    Veja o exemplo em vba

    Código:
    txtSomaA = DSum("A", "TESTE")
    txtSomaB = DSum("B", "TESTE")
    Anexos
    dsum.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (55 Kb) Baixado 15 vez(es)

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Re: GROUP BY SUM

    Mensagem  formiga10x em Dom 23 Fev 2014, 22:40

    No seu caso é Excel aconselho dar uma lida:

    [Você precisa estar registrado e conectado para ver este link.]

    eduardohsantos
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 23/02/2014

    Re: GROUP BY SUM

    Mensagem  eduardohsantos em Dom 23 Fev 2014, 22:47

    Como você falo no meu caso é no excel. Anexei um arquivo de modelo, mas não sei as formulas para chegar nesse resultado. Eu sei que utiliza group by sum, mas os artigos na internet está tudo em inglês e eu sou brasileiro.  Very Happy  Mas se puder ajudar ficarei grato. Eu li esse artigo que você mando só que não é isso exatamente que eu quero.
    Anexos
    GROUP BY.xlsx
    Você não tem permissão para fazer download dos arquivos anexados.
    (11 Kb) Baixado 5 vez(es)

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

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

    Re: GROUP BY SUM

    Mensagem  formiga10x em Dom 23 Fev 2014, 22:57

    Veja o fórum é para access mas, aguarde um pouco sempre tem um dos mestres que ajudam. Eu infelizmente não entendo bulufas de Excel.

    eduardohsantos
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 23/02/2014

    Re: GROUP BY SUM

    Mensagem  eduardohsantos em Dom 23 Fev 2014, 22:59

    ok. tudo bem. Valeu assim mesmo pela atenção. Vô espera.

    DARTH
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5
    Registrado : 07/12/2013

    Re: GROUP BY SUM

    Mensagem  DARTH em Sab 05 Abr 2014, 19:07

    Amigo.
    É só isso?

    Na folha do excel onde tens os valores (Dados), coloca um botão e dá-lhe o nome que entenderes.

    Depois de colocar o botão, clica nele com duplo click e abre-te uma janela de VB.

    Copia e cola para essa janela o código que junto.

    Depois é só colocares os valores que quiseres e quando quiseres somá-los, apenas clicas no botão.
    Código:

    Private Sub CommandButton1_Click()
    Dim start As Integer
    Dim AAA As Variant, BBB As Variant, CCC As Variant, DDD As Variant
    start = 2
    While Range("Dados!A" & start).Value <> ""

        If Range("Dados!A" & start).Value = "A" Then
        AAA = Range("Dados!B" & start).Value
        somaA = somaA + Range("Dados!B" & start).Value
        End If
        If Range("Dados!A" & start).Value = "B" Then
        BBB = Range("Dados!B" & start).Value
        somaB = somaB + Range("Dados!B" & start).Value
        End If
        If Range("Dados!A" & start).Value = "C" Then
        CCC = Range("Dados!B" & start).Value
        somaC = somaC + Range("Dados!B" & start).Value
        End If
        If Range("Dados!A" & start).Value = "" Then
        DDD = Range("Dados!B" & start).Value
        somaD = somaD + Range("Dados!B" & start).Value
        End If
       
        start = start + 1
       
      Wend
    Sheets("Somatória").Range("A2") = "A"
    Sheets("Somatória").Range("B2") = somaA
    Sheets("Somatória").Range("A3") = "B"
    Sheets("Somatória").Range("B3") = somaB
    Sheets("Somatória").Range("A4") = "C"
    Sheets("Somatória").Range("B4") = somaC
    Sheets("Somatória").Range("A5") = "D"
    Sheets("Somatória").Range("B5") = somaD

    End Sub


    Espero que te sirva.

    Um abraço
    DARTH.

      Data/hora atual: Qui 08 Dez 2016, 12:01