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

    [Resolvido]Somar campos de uma tabela

    avatar
    costa256
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 66
    Registrado : 22/01/2019

    [Resolvido]Somar campos de uma tabela Empty [Resolvido]Somar campos de uma tabela

    Mensagem  costa256 25/10/2022, 18:56

    Nobres amigos.

    tenho uma tabela com apenas uma linha e 6 colunas. Essa tabela recebe valores Integer.

    Estou precisando de uma função que some todos os valores dessa tabela e transfira o resultado para uma Var.

    Alguém pode me ajudar?
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 962
    Registrado : 09/11/2012

    [Resolvido]Somar campos de uma tabela Empty Re: [Resolvido]Somar campos de uma tabela

    Mensagem  =>Nois 25/10/2022, 21:03

    Dim curX As Integer
    curX = DSum("ColunaA", "SuaTabela")+DSum("ColunaB", "SuaTabela").....

    Ou em uma consulta sumarizada

    Dim curX As Integer
    curX = dlookup("suaColuna","nomedaconsulta")


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    costa256
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 66
    Registrado : 22/01/2019

    [Resolvido]Somar campos de uma tabela Empty Re: [Resolvido]Somar campos de uma tabela

    Mensagem  costa256 26/10/2022, 15:53

    Caro amigo Nois. Obrigado pela ajuda incrível.

    Resolvi da seguinte forma

    Como a tabela tem apenas uma linha e não tem incrementação de linha, os dados são apenas atualizados, criei uma coluna chamada "total" e inseri uma expressão de dado calculado somando as células.

    No form eu criei a variável e inseri o código, onde VarCod recebe o valor 1 que é o nr do registro da linha.

    VarCont = DLookup("Total", "tbl_Contador", "Código=" & VarCod)


    Grande abraço e obrigado pela ajuda
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 962
    Registrado : 09/11/2012

    [Resolvido]Somar campos de uma tabela Empty Re: [Resolvido]Somar campos de uma tabela

    Mensagem  =>Nois 26/10/2022, 16:09

    fórum agradece


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken

      Data/hora atual: 3/12/2022, 03:49