[Resolvido]Atualizar campo de retorno do valor com Dlookup

Bom dia,

Preciso de ajuda com a função Dlookup e não encontrei no Fórum algo próximo do que preciso e sei que para muitos aqui a solução é bem simples.

Pois bem:

Meu campo no Form principal trás um cálculo de soma com a função Dlookup através de uma consulta:

Campo: Saldo_Dinheiro

código: Me.Saldo_Dinheiro = DLookup("SomaDeRecebido_venda", "cs_Vendas_Dinheiro")

Esse código mostra somente o que foi vendido à Dinheiro.

Ao fechar o Form de Vendas esse campo está no Form Principal e ele não atualiza o saldo. Somente quando fecho o Form Principal e abro novamente ele é atualizado.

Coloquei o código abaixo ao fechar o Form de Vendas:

Forms!Principal.requery
Forms!Principal.refresh
Forms!Principal!Saldo_Dinheiro.requery
Forms!Principal!Saldo_Dinheiro.recalc

E nada.

Alguma ideia?

Olá!

Após a ação do botão, coloca:

Me.recalc


Não precisa fechar o formulário para que atualize.

Testa aí e ver se é isso mesmo que precisa.

Grato.

Jomar Matos.

Jomar,

Já tentei este possibilidade mas não recalcula.

Bom dia
Porque não procura directamente nas tabelas envolvidas? A consulta só devolve depois de fechar o form enquanto a consulta directa nas tabelas trará o resultado

Bom dia Alexandre,

Agradeço o retorno mas não entendi seu raciocínio.

Como estou trabalhando com o Dlookup e retornando o calculo de uma consulta filtrada por Vendas à dinheiro, como poderia utilizar as tabelas?

O resultado que busco vem de campo calculado na consulta.

Mas a consulta vai buscar a tabela e será possível ir buscar directamente à tabela

Alexandre,

O problema é que o resultado que busco é um campo calculado. A resposta que o Dlookup me traz é a seguinte:

Valor recebido em Dinheiro - Total da Compra - Troco = Dinheiro em caixa

Total da compra= É o resultado da soma dos valores unitários dos produtos multiplicados pela quantidade)

Dito isto, o campo que mostra este valor só é atualizado quando o Form é fechado e aberto novamente.

Tem alguma forma de atualizar este campo que traz o calculo em VB do Dlookup?

SE o valor estiver no formulário e ainda não gravado na tabela deve ir buscar ao controlo do formulário (Forms!NomeFormulario!NomeControlo.value)

Ok Alexandre.

Mas onde devo colocar este recurso? (Forms!Meu!Venda_Dinheiro.value)?

Coloque no Dlookup

Alexandre,

Consegui da seguinte forma:

Coloquei direto no campo: =DSoma("SomaDeRecebido_venda";"cs_Vendas_Dinheiro";"Pagto_venda='" & "Dinheiro" & "'")

Muito obrigado pela ajuda!!!

Mais correcto:
=DSoma("SomaDeRecebido_venda";"cs_Vendas_Dinheiro";"Pagto_venda='Dinheiro')

Alexandre,

Corrigido. Obrigado novamente!!!