Calculos via VBA

Tenho um Sub_Formulário onde contem:

txtQuant
txtValorUnit

No Rodapé do Sub_Formulário contem:

txtTotal

No campo txtTotal coloquei a seguinte sintaxe: =Soma([txtQuant]*[txtValorUnit])

Funciona bem, mas a demora para totalizar a soma é terrível. As vezes demora uns 10 segundos para aparecer o resultado, mesmo contendo apenas 2 itens para somar. Isso para um PDV é o fim do mundo.

1. Gostaria de saber o porque da demora. OBS: Em alguns computadores soma rápido, em outros ocorre a demora. Testei em 4 máquinas.

2. Pensei em forçar esse resultado (=Soma([txtQuant]*[txtValorUnit])) via VBA, mas quando coloco assim:

txtTotal = Soma([txtQuant]*[txtValorUnit])

Dá erro dentro do VBA.

Como fazer essa soma via VBA? Ou porque em alguns computadores o mesmo .mdb demora demais pra mostrar o resultado?

Obrigado a todos.

Jonas

Bom dia Jonas....


Segue um exemplo completo para PDV.

Lembrando a ti e a todos que lerem esse tópico:

a: desconheço a autoria do exemplo.*****
b: não desenvolvi o mesmo.
c: se alguém souber o autor, favor me avisar, para colocar os devidos créditos a essa pessoa.


***** editando essa mensagem:
autor: Plínio Mabessi
Data Projeto: Out/2010
Site:http://www.usandoaccess.com.br/tutoriais/tuto29.asp?id=1#inicio

Estude ele, adapte o mesmo as tuas necessidades.

Abraços.

Bom dia Silvio,

Eis, aí a sua solicitação:
http://www.usandoaccess.com.br/tutoriais/tuto29.asp?id=1#inicio

Boa tarde Zorzozzo !

Muito obrigado mesmo.

Abraços !

Silvio, aproveitando a deixa...

tentei utilizar este aplicativo em um notebook Dell, Win7 e me deu o seguinte erro:
'erro: 2501
'A ação OpenForm foi cancelada.

Desinstalei o Visual Basic que tinha na máquina e reinstalei o MSOfficce, mas deu o mesmo erro.
O que pode ser? As referências estão Ok.

Zorzozzo, Boa noite !

Provavelmente, você deve estar usando um sistema de 64Bits !