Boa noite amigo !!!
Bem não sei se eu entendi muito bem, mas tente usar uma instrução SQL que execute uma atualização (Update) em sua tabela.
Exemplo:
'
'Essa instrução SQL irá atualizar o campo SALDO da tabela TABPEDIDOS com os
'valores de SALDOANTERIOR - VALORSAQUE do pedido cujo código é igual a 10
'
UPDATE tabped SET saldo = saldoant - valorsaq WHERE numped = 10
Ou Então
'
'No evento que deseja executar a atualização coloque
'o código abaixo, Pode ser no LOAD de um form ou no CLICK de um botão
'
Dim db as Database
Dim qd as QueryDef
Dim dyn as Recordset
Dim Sql as String
set db=DbEngineworkspaces(0).Opendatabase(app.path & "Vendas.mdb") sql= "UPDATE tabped SET saldo = saldoant - valorsaq WHERE numped = 10 "
set qd=db.CreateQueryDef("Atualiza", Sql )
qd.Execute
'
'No exemplo acima irá ser criada uma QueryDef (Consulta) com o nome 'Atualiza, ao ser executada o pedido numero 10 terá o saldo atualizado para
'o resultado de saldoant - valorsaq
'
Tentei...
