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] & ""
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] & ""