[Resolvido]Soma de campos e por linha

Boa tarde galera do Fórum, estou com o seguinte problema:

Tenho uma tabela onde eu preciso pegar 3 campos e fazer a soma dele criando a coluna Total e inserindo o resultado de cada linha...

Na hora da soma, ele tá fazendo a soma da coluna por inteiro e não pegando CampoA + CampoB + CampoC e fazendo a soma a cada linha... ele tá fazendo a soma no geral...

Alguém poderia me ajudar?

Ola Cibele;

Mostre como está a sua formula.

Em muitos lugares vi que o jeito é até que simples, mas não enxerguei o meu erro...

Segue o código...

Dim db As Database, cs As Recordset

Set db = CurrentDb()
Set cs = db.OpenRecordset("SELECT [Campo1], [Campo2], [Campo3], from tbTeste_Total;")

If Not cs.EOF Then
While Not cs.EOF
wC1 = cs![Campo1]
wC2 = cs![Campo2]
wC3 = cs![Campo3]

vSoma = (wC1 + wC2 + wC3)
vResult = vSoma / 100

DoCmd.RunSQL "UPDATE tbTeste_Total SET TOTAL = '" & vResult & "' "

cs.MoveNext
Wend
End If
Set cs = Nothing
Set db = Nothing

Eu gosto mais de trabalhar direto no Recordset, deste jeito e o campo TOTAL tem de estar em Texto para receber o resultado dividido por 100:



Dim db As Database, cs As Recordset

Set db = CurrentDb()
Set cs = db.OpenRecordset("SELECT * from tbTeste_Total;")

cs.MoveFirst

Do While Not cs.EOF
cs.Edit
cs.Fields("TOTAL") = (cs.Fields("Campo1") + cs.Fields("Campo2") + cs.Fields("Campo3"))/100

cs.Update
cs.MoveNext
Loop

Set cs = Nothing
Set db = Nothing

E ae, funfou ?

Oi JPaulo.... funcionou sim... incrivel ver como era um erro tão besta ( na declaração)....

Fiz da segunda forma msm para ficar fácil de identificar os campos em uma possível manutenção...

Mto obrigada e um grande bjo!

Obrigada pelo retorno o forum agradece e Feliz Natal...

Faltou o "resolvido"...rs