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]Actualizar tabela com dados de varios registros de um Subformulário

    avatar
    NgLemos
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 16
    Registrado : 22/08/2013

    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Empty [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário

    Mensagem  NgLemos 3/9/2013, 19:08

    Boa noite,

    Preciso mais uma vez da vossa ajuda:

    Tenho um formulário (Consulta) que tem o subformulário (SUBCCSLtblPrevAvançoFamilia) que está vinculada a tabela/consulta (CCSLtblPrevAvançoFamilia).

    Quando faço a pesquisa no formulario (consulta) apresenta os registros dos campos CodNatureza e SomaDeSomaDeTCustoRecPrev.

    O que pretendo é que com um evento ele actualiza na tabela tblNatureza o campo (CustoTotal) = SomaDeSomaDeTCustoRecPrev quando o Registro for igual ao CodNatureza na tabela tblNatureza, e está a fazer, só que um por um, por exemplo dos 7 registro no subformulario tenho que selecionar 1 por 1 e clicar no botão para o evento, e isto não é funcional o que pretendo é que no evento faça para todos os registros

    A instrução que está a funcionar por registro do subformulário é esta:

    CurrentDb.Execute "UPDATE tblNatureza set [CustoTotal]=" & Replace([Forms]![CONSULTAS]![SUBCCSLtblPrevAvançoFamilia]![SomaDeSomaDeTCustoRecPrev], ",", ".") & " WHERE [CodNatureza] = " & [Forms]![CONSULTAS]![SUBCCSLtblPrevAvançoFamilia]![CodNatureza] & ""


    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Empty Re: [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário

    Mensagem  JPaulo 3/9/2013, 19:15

    E todos os registros do subform têm o mesmo [CodNatureza] ?


    .................................................................................
    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]Actualizar tabela com dados de varios registros de um Subformulário Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Folder_announce_new Instruções SQL como utilizar...
    avatar
    NgLemos
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 16
    Registrado : 22/08/2013

    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Empty Re: [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário

    Mensagem  NgLemos 3/9/2013, 19:44

    Boa noite,

    Não têm.
    Por isso que coloco no critério (CodNatureza), é que na tabela tblNatureza tenho o campo onde estão criada as varias (CodNatureza) e o Campo (CustoTotal) o que deve acontecer é o campo (CustoTotal) ser actualizado com o valor do campo (SomaDeSomaDeTCustoRecPrev) do subformulário quando o CodNatureza for igual.
    O (CodNatureza) da consulta vinculada ao subformulário não tem mais de 1 pois já é a soma de todas os elementos ligados a esta CodNatureza. Por isso no subformulário só ira aparecer sempre uma única vez o CodNatureza, nunca repetido. Por Exemplo:

    Na consulta dá 7 registro conforme abaixo, (atenção na consulta não aparece o campo registro) inclui só para melhor perceber.

    Registro CodNatureza SomaDeSomaDeTCustoRecPrev
    1                  5010                        47,838
    2                   5011                       1046,5
    3                  5012                      45001,2
    4                   5017                       8542,5
    5                   7010                      1046,5
    6                   7011                       227,5
    7                   7012                        3165

    O que pretendo é que no evento seja feita a actualização na tabela tblNatureza dos 7 registros ou a quantidade de registros que aprecerem no subformulário.
    Neste caso iria actualizar na tabela tblNatureza o campo (CustoTotal) = (SomaDeSomaDeTCustoRecPrev) do subformulário onde o CodNatureza fosse igual aos CodNatureza do subformulário, mas apenas num evento.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Empty Re: [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário

    Mensagem  JPaulo 4/9/2013, 11:56

    Então jamais poderá utilzar o WHERE [CodNatureza], porque desse modo vai atualizar apenas um registro.


    .................................................................................
    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]Actualizar tabela com dados de varios registros de um Subformulário Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Folder_announce_new Instruções SQL como utilizar...
    avatar
    NgLemos
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Angola
    Mensagens : 16
    Registrado : 22/08/2013

    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Empty Re: [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário

    Mensagem  NgLemos 27/11/2013, 13:44

    Ok obrigado, resolvido

    Conteúdo patrocinado


    [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário Empty Re: [Resolvido]Actualizar tabela com dados de varios registros de um Subformulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 12:27