AccessTr.neT

Tam Versiyon: Raporda yürüyen bakiye
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Arkadaşlar merhaba;

Mutabakat raporundaki bakiye kısmını yürüyen bakiye olarak düzeltmem lazım. Yardımcı olabilir misiniz?
Merhaba,

Rapordaki Metin68'in denetim kaynağını sil,

Raporun Vba sayfasında en üste aşağıdaki kodu ekle


Kod:
Option Compare Database

Dim GToplam As Currency


Raporda, ayrıntının yazıldığında olayına aşağıdaki kodu ekle.

Kod:
Private Sub Ayrıntı_Print(Cancel As Integer, PrintCount As Integer)

   GToplam = GToplam + (Nz([BORC], 0) - Nz(Me.ODEME, 0))

   Me.Metin68 = GToplam

End Sub
Sayın ozanakkaya;

Teşekkür ediyorum. 
Önceki tarihlerden devir varsa onuda raporda ayrıntının yazıldığında olayına şunu ekleyerek toplattım. Me.Metin68 = Nz([Metin67], 0) + GToplam sonuç doğru çıktı.