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


4 participantes

    [Resolvido]Somar valores das linhas de uma coluna da listbox

    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Somar valores das linhas de uma coluna da listbox

    Mensagem  Marcelo David 23/3/2012, 20:20

    Olá amigos,

    Estou tentando já algum tempo somar os valor das linhas de uma determinada coluna em uma listbox, mas não estou obtendo exito, alguma sugestão?

    Grato!


    .................................................................................
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores das linhas de uma coluna da listbox Marcel11
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8499
    Registrado : 05/11/2009

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Alexandre Neves 23/3/2012, 20:25

    Boa noite, Marcelo

    A soma é para ser apresentada na última linha da caixa de listagem? É para obter e trabalhar noutro local?
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Marcelo David 23/3/2012, 20:29

    Sim, é usa-la em outro local.


    .................................................................................
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores das linhas de uma coluna da listbox Marcel11
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8499
    Registrado : 05/11/2009

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Alexandre Neves 23/3/2012, 22:03

    Para somar 1ª coluna


    Dim I,Soma as double

    soma=0
    For I = 0 To Lista0.ListCount - 1
    soma=soma+ Lista0.Column(0, Lista0.ListIndex)
    Next
    msgbox soma
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Marcelo David 23/3/2012, 22:29

    Grande Alexandre, está somando, mas só quando eu seleciono alguma linha... Very Happy
    Terá que ser assim mesmo?


    .................................................................................
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores das linhas de uma coluna da listbox Marcel11
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8499
    Registrado : 05/11/2009

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Alexandre Neves 24/3/2012, 10:30

    Bom dia, Marcelo

    Terei errado, pois não testei
    Coloque
    Dim I,Soma as double

    soma=0
    For I = 0 To Lista0.ListCount - 1
    soma=soma+ Lista0.Column(0, I)
    Next
    msgbox soma
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Assis 24/3/2012, 13:03

    Bom tarde Alexandre

    Em que evento ?
    E a colocar o valor numa caixa de texto do form aonde está a lista.

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8499
    Registrado : 05/11/2009

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Alexandre Neves 24/3/2012, 15:05

    Boa tarde, Assis

    Para pôr o valor em caixa de texto:
    Dim I,Soma as double

    soma=0
    For I = 0 To Lista0.ListCount - 1
    soma=soma+ Lista0.Column(0, I)
    Next
    TxtQualquerCoisa= soma
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Assis 24/3/2012, 15:12

    Obrigado Alexandre

    Para mim resolvido



    .................................................................................
    *** Só sei que nada sei ***
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Silvio 24/3/2012, 15:13

    Bom dia a todos.

    Como é ótimo o nível desse fórum. Nos enriquece sempre com conhecimento e práticas. Respostas quase que imediata dos membros.

    Excelente mesmo.

    Parabéns para todos.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Marcelo David 24/3/2012, 15:36

    Boa tarde a todos,
    agora está dando tipos incompatíveis.


    .................................................................................
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores das linhas de uma coluna da listbox Marcel11
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8499
    Registrado : 05/11/2009

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Alexandre Neves 24/3/2012, 16:38

    Boa tarde, Marcelo
    Provavelmente, algum elemento está nulo ou vazio.
    Tente assim:
    Dim I,Soma as double

    soma=0
    For I = 0 To Lista0.ListCount - 1
    If Val(Lista0.Column(0, I))>0 Then soma=soma+ Val(Lista0.Column(0, I))
    Next
    TxtQualquerCoisa= soma
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Marcelo David 26/3/2012, 14:51

    Perfect!!
    Muito obrigado Alexandre!


    .................................................................................
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Somar valores das linhas de uma coluna da listbox Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Somar valores das linhas de uma coluna da listbox Marcel11

    Conteúdo patrocinado


    [Resolvido]Somar valores das linhas de uma coluna da listbox Empty Re: [Resolvido]Somar valores das linhas de uma coluna da listbox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 24/11/2024, 22:08