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]Soma de campos TextBox

    avatar
    RaphaelMaciel
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 23/04/2012

    [Resolvido]Soma de campos TextBox Empty Soma de campos TextBox

    Mensagem  RaphaelMaciel 8/8/2012, 14:37

    Estou tentando somar os valores de alguns textbox e jogar essa soma em outro textbox e está dando erro.

    O código que estou usando é este.
    Me.txtTotal_Prod.Value = Soma([Me.txtTurno1_Prod.Value] + [Me.txtTurno2_Prod.Value] + [Me.txtTurno3_Prod.Value])

    Agradeço a ajuda!
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  Silvio 8/8/2012, 14:40

    Boas, tente dessa forma..

    Me.txtTotal_Prod.Value = NZ([Me.txtTurno1_Prod.Value];0) + NZ([Me.txtTurno2_Prod.Value];0) + NZ([Me.txtTurno3_Prod.Value];0)


    .................................................................................
    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."
    avatar
    RaphaelMaciel
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 23/04/2012

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  RaphaelMaciel 8/8/2012, 14:43

    Olá Silvio.

    Está dando erro no ponto e virgula antes do 0 dizendo que era esperado separador de lista ou )

    Abraaaço e agradeço a ajuda
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  Silvio 8/8/2012, 14:58

    Tente assim...


    Me.txtTotal_Prod.Value = NZ(([Me.txtTurno1_Prod.Value]);0) + NZ(([Me.txtTurno2_Prod.Value]);0) + NZ(([Me.txtTurno3_Prod.Value]);0)


    .................................................................................
    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."
    avatar
    RaphaelMaciel
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 23/04/2012

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  RaphaelMaciel 8/8/2012, 15:06

    Opa Silvio, o erro continua....o mesmo erro
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  Silvio 8/8/2012, 15:34

    Por gentileza, me manda a parte do BD, que esta com problemas para eu dar uma olhada nela..


    .................................................................................
    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."
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  JPaulo 8/8/2012, 15:51

    Em VBA tem de trocar o ponto e virgula por apenas virgula.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Soma de campos TextBox Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Soma de campos TextBox Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Soma de campos TextBox Folder_announce_new Instruções SQL como utilizar...
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  Silvio 8/8/2012, 16:00

    Boa tarde JPaulo......braçada minha aqui.....você está correto mesmo.

    Me.txtTotal_Prod.Value = NZ([Me.txtTurno1_Prod.Value],0) + NZ([Me.txtTurno2_Prod.Value],0) + NZ([Me.txtTurno3_Prod.Value],0)


    .................................................................................
    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."
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  JPaulo 8/8/2012, 16:02

    Sem problema algum amigão, apenas olho vivo... Laughing



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Soma de campos TextBox Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Soma de campos TextBox Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Soma de campos TextBox Folder_announce_new Instruções SQL como utilizar...
    avatar
    RaphaelMaciel
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 23/04/2012

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  RaphaelMaciel 8/8/2012, 16:04

    Silvio vou ver o que consigo diminuir do banco para te mandar porque ele ta muito grande!

    JPaulo eu tentei sem o ponto e virgula, colocando a virgula no lugar, veja o erro que dá:

    "O Microsoft Office Access não pode localizar o campo '|' referido em sua expressão".

    Obrigado pela ajuda
    avatar
    RaphaelMaciel
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 23/04/2012

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  RaphaelMaciel 8/8/2012, 16:30

    Segue o Formulario que estou trabalhando. O nome é F_Cadastro.

    Na parte de Producao quero que os campos turno1, turno2 e turno3 seja somado e mostrado no campo total.

    Valeu pela Ajuda!!
    Anexos
    [Resolvido]Soma de campos TextBox AttachmentExemplo Site.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (99 Kb) Baixado 16 vez(es)
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  JPaulo 8/8/2012, 16:44

    Com a permissão do Grande Silvio.

    No evento VBA do currente no seu formulario;

    Private Sub Form_Current()
    Me.txtTotal_Prodtv.Value = Nz(Me.txtTurno1_Prodtv.Value, 0) + Nz(Me.txtTurno2_Prodtv.Value, 0) + Nz(Me.txtTurno3_Prodtv.Value, 0)
    End Sub




    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Soma de campos TextBox Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Soma de campos TextBox Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Soma de campos TextBox Folder_announce_new Instruções SQL como utilizar...
    avatar
    RaphaelMaciel
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 23/04/2012

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  RaphaelMaciel 8/8/2012, 17:42

    Olá JPaulo!
    Baixei o arquivo que postou, mas pelo que percebi nao está calculando, nao sei se com voce funcionou!

    Esse evento Form_Current seria exatamente o que, como ele funciona??

    Abraaaço e desde ja agradeço a ajuda!
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  JPaulo 8/8/2012, 18:02

    Alterado;

    Não soma por estar em Texto, apliquei a função VAL e mudei de eventos;

    Me.txtTotal_Prodtv.Value = Nz(Val(Me.txtTurno1_Prodtv.Value), 0) + Nz(Val(Me.txtTurno2_Prodtv.Value), 0) + Nz(Val(Me.txtTurno3_Prodtv.Value), 0)

    Veja:
    Anexos
    [Resolvido]Soma de campos TextBox AttachmentExemplo Site_OLD_OLD.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (97 Kb) Baixado 69 vez(es)


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Soma de campos TextBox Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Soma de campos TextBox Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Soma de campos TextBox Folder_announce_new Instruções SQL como utilizar...
    avatar
    RaphaelMaciel
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 23/04/2012

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  RaphaelMaciel 8/8/2012, 18:40

    Resolvido....Obrigado JPAULO
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  JPaulo 8/8/2012, 19:18

    Obrigado pelo retorno o fórum agradece.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Soma de campos TextBox Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Soma de campos TextBox Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Soma de campos TextBox Folder_announce_new Instruções SQL como utilizar...

    Conteúdo patrocinado


    [Resolvido]Soma de campos TextBox Empty Re: [Resolvido]Soma de campos TextBox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 12:37