örneğinizi biraz inceledim. dediğinizi tam anlamadım fakat anladığım. şu durum.
hesaplama bölümlerini tabloya yazdırmak istiyorsunuz. daha projeniz eksik durumda. veya bize geldiği şekil eksik. normal şartlarda hesaplamaları otomatik yapması gerekiyor. fakat biz el ile yazıyoruz. bunları tabloya kaydetmesi gerekiyor. kaydetmiyor çünkü ilişkisiz. tabloya kaydet desek kaydetmeyecek çünkü orada kayıtlı bir değer var (sıfır), onun için yeni bir alan açıp oraya yazacak. o yüzden mecburen güncelleme dememiz gerekir.

If IsNull(Me.musterino) Or Me.musterino = "" Then 'müşteri numarası mevcut mu diye kontrol ediyoruz.



GoTo 100

Else

End If



Dim rs As New ADODB.Recordset

 rs.Open "tbl_musteri", CurrentProject.Connection, adOpenKeyset, adLockOptimistic 'tablomuza bağlanıyoruz.



 rs.Find "[musteri_no]=" & Me.musteri_no ' işlem yapılacak müşteriyi belirtiyoruz.

 

 rs.Fields("buraya tablo alan adını yazınız") = Me.buraya formda bulunanmetin kutusu adını yazınız.

 've üstteki kodu gerektiği kadar tekrar ediniz.



 rs.Update '

 ' Stop

 rs.Close



Set rs = Nothing

100

bu kodu istediğiniz olaya yazınız. örneğin. metin kutusundan çıkılınca veya güncelleme sonrası vb.

kod sayesinde tabloyaya yazılacağı için istediğiniz olacaktır diye düşünüyorum.

yanlış anlamadı isem isteğiniz bu.

not: birde müşteri numaranız otomatik sayı düşünceme göre manuel olsa daha mantıklı olur. her müşteride otomatik kendi kendine artan bir şekilde.