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


3 participantes

    [Resolvido]Somar valores de uma caixa de listagem

    avatar
    João afonso
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 396
    Registrado : 24/05/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Somar valores de uma caixa de listagem

    Mensagem  João afonso 18/2/2012, 00:34

    Boa noite a todos.

    Tenho um formulário e nele tenho uma caixa de listagem contendo um campo chamado valor e gostaria que no meu formulário em um campo texto desacoplado eu conseguise o total dos valores = soma de todos os valores em registro.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  Marcelo David 18/2/2012, 01:01

    Qual a origem dos dados?


    .................................................................................
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores de uma caixa de listagem Marcel11
    avatar
    João afonso
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 396
    Registrado : 24/05/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  João afonso 18/2/2012, 01:09

    uma Consulta
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  Marcelo David 18/2/2012, 01:25

    Essa consulta tem algum critério? Caso não tenha, tente:
    Em um campo não acoplado:
    =DSoma("Valor";"NomeTabelaOrigemConsulta")


    Caso a consulta tenha algum critério:

    Em um campo não acoplado:
    =DSoma("Valor";"NomeConsulta")

    Troque o que estiver em vermelho pelos seus controles. O campo valor, seria interessante você alterar para outro nome, por exemplo vl, pois acho(não tenho certeza) que "Valor" é uma palavra reservada...


    .................................................................................
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores de uma caixa de listagem Marcel11
    avatar
    João afonso
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 396
    Registrado : 24/05/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  João afonso 18/2/2012, 01:33

    caso eu queira fazer essa soma por periodo de mês.

    Tenho neste listBox o campo valor e dadas, sendo gostaria de somar todos os valores de um mês
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  Marcelo David 18/2/2012, 01:46

    Aí ja muda...
    Isso seria interessante em um relatório...
    Para o que você informou no tópico, os métodos acima funcionam...


    .................................................................................
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores de uma caixa de listagem Marcel11
    avatar
    João afonso
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 396
    Registrado : 24/05/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  João afonso 18/2/2012, 01:53

    Marcelo o código acima funcionou.

    porem vou tentar buscar informação por mês através de um criterio.

    Valeu Marcelo, obrigado
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  Marcelo David 18/2/2012, 02:04

    Ok, para dúvida desde tópico acho que já foi resolvida, agora é melhor outo tópico para a outra dúvida...
    (Ficará mais claro para quem for pesquisar)...


    .................................................................................
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores de uma caixa de listagem Marcel11
    avatar
    João afonso
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 396
    Registrado : 24/05/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  João afonso 18/2/2012, 02:23

    Ok mas uma vez, obrigado Marcelo.
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  Marcelo David 18/2/2012, 02:25

    Grato pelo retorno, no próximo tópico, estaremos vendo...


    .................................................................................
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores de uma caixa de listagem Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores de uma caixa de listagem Marcel11
    avatar
    João afonso
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 396
    Registrado : 24/05/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  João afonso 18/2/2012, 04:24

    Marcelo a soma de um campo do listBox ficou assim:

    On Error Resume Next
    Dim x
    Dim soma
    soma = 0
    For X = 1 To Me.Lista.ListCount - 1
    soma = soma + Me.lista.Column(4, X)
    Next
    Me.SubTotal = soma
    avatar
    João afonso
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 396
    Registrado : 24/05/2011

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  João afonso 18/2/2012, 04:43

    O tópico foi resolvido comforme mostro acima.
    Caio
    Caio
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 301
    Registrado : 27/04/2015

    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  Caio 2/10/2015, 14:31

    Onde coloco esse código João afonso?

    Conteúdo patrocinado


    [Resolvido]Somar valores de uma caixa de listagem Empty Re: [Resolvido]Somar valores de uma caixa de listagem

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 04:28