11/01/2017, 12:28
11/01/2017, 12:41
Merhaba,
Rapordaki Metin68'in denetim kaynağını sil,
Raporun Vba sayfasında en üste aşağıdaki kodu ekle
Raporda, ayrıntının yazıldığında olayına aşağıdaki kodu ekle.
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
11/01/2017, 13:14
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ı.
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ı.