Atualizar Totalizador imediatamente

Tenho um formulário principal e um sub formulário. Dentro do sub formulário tenho no rodapé um totalizador que soma o valor de um campo. A minha dificuldade está em actualizar imediatamente o campo totalizador, só actualiza quando mudo de registo, mas preciso actualizar imediatamente o campo que está no formulário senão o valor fica errado.

Preciso que o valor seja logo actualizado assim que altere a qtd/valor. Neste exemplo o totalizador tem que ser 6 não 4:




Obrigado

Boa noite, e bem-vindo ao fórum

Qual código/fórmula tem para cálculo da soma?
Como se chamam os controlos envolvidos?

Olá Nezokk;

Tente as linhas abaixo no evento AfterUpdate nos controles QTD e Valor_Unit do subformulário:

DoCmd.RunCommand acCmdSaveRecord
Me.NomeDoCampo.Recalc

Talvez isso ajude!

Bom trabalho!

Obrigado pelas respostas.

Alexandre: No evento after update tanto no campo quantidade como valor unitário tenho o valor a multiplicar (ValorLinha = QTD * Valor)

No total coloquei esta formula na origem de controlo: =Soma([ValorLinha])

Lucio:

Experimentei a sua sugestão no entanto o .recalc dá-me o seguinte erro:

compile error:

Method or data not found

Bastou o DoCmd.RunCommand acCmdSaveRecord para actualizar o totalizador, mas estou com outro problema em actualizar um campo no formulário principal.

Criei um campo na tabela do formulário principal para armazenar esse valor, vou precisar para futuras consultas. Gostava de actualizar logo esse campo. Coloquei este código no after update no final Forms!Formulário!campo = totalizador:

Private Sub Valor_AfterUpdate()
ValorLinha = QTD * Valor
DoCmd.RunCommand acCmdSaveRecord
Forms!Encomenda!Custo = Totalizador
End Sub

Nezokk;

Veja o que diz a ajuda do access sobre o método Recalc:

O método Recalc atualiza imediatamente todos os controles calculados (controle calculado: um controle usado em um formulário, um relatório ou uma página de acesso a dados para exibir o resultado de uma expressão. O resultado é recalculado sempre que ocorre uma alteração em um dos valores nos quais a expressão está baseada.) em um formulário.

Sintaxe

expressão.Recalc

expressão =>  Uma variável que representa um objeto Form.

Valor de retorno
Nothing

Comentários

A utilização desse método equivale a pressionar a tecla F9 quando um formulário tem o foco. Você pode utilizar esse método para recalcular valores de controles que dependem de outros campos para os quais o conteúdo possa ter sido alterado.

Exemplo

O exemplo a seguir utiliza o método Recalc para atualizar os controles em um formulário Pedidos. Esse formulário inclui a caixa de texto Freight, que exibe o custo do frete, e um controle calculado que exibe o custo total de um pedido incluindo o frete. Se a instrução que contém o método Recalc for colocada no procedimento do evento AfterUpdate da caixa de texto Freight, o custo total de um pedido será recalculado toda vez que um novo valor de frete for inserido.

Visual Basic for Applications
Sub Freight_AfterUpdate()
   Me.Recalc
End Sub


Utilizo o access 2007. Talvez esse método possa ser utilizado para resolver o problema de atualizar o campo no formulário principal.

Bom trabalho!

O meu access não reconhece esse comando. Será que me falta alguma activar algo nas references?

Acredito que não; pois, não adicionei qualquer biblioteca.

Talvez a instrução:

Me.Recalc

seja suficiente. Afinal, pela mensagem de erro apresentada, o access não reconheceu o método podendo ser indicativo de erro de sintaxe. Repare a diferença em relação à proposta anterior: Me.NomeDoCampo.Recalc

Bom trabalho.