sayın berduş;
liste 1 tıklama,güncelleştirme sonrası - öncesi olaylarına Call topla ekledim.

topla kısmındada dediğiniz düzeltmeyi yaptım ancak


Private Sub topla()
Dim Sw As Long, Sonuc As Double
For Sw = 1 To Me.Liste94.ListCount - 1
Sonuc = Sonuc + CDbl(Nz(Me.Liste94.Column(6, Sw), 0))
Next Sw
Me.toplatxt = Sonuc
End Sub

----------
Sonuc = Sonuc + CDbl(Nz(Me.Liste94.Column(6, Sw), 0))

kısmında Type mismatch hatası veriyor.
toplamak istediğim sütun para birimi ve sorgudaki hali;

Genel Toplam: SY("j";"Liste94";Format(Topla((([Fiyat]-([Fiyat]*[İskonto]))+(([Fiyat]-([Fiyat]*[İskonto]))*[KDV])));"#,###00.00 TL");0;Doğru)
şeklinde. acaba bundan dolayı hata veriyor olabilirmi.