Raporda Yürüyen Satır No

Sayın Hocalarım,

Ekteki çalışmamda RPR_TBLCARIGELIR raporunu aylık yazdıracağımdan rapordaki satır no yürüyen satır no yapmak istiyorum.

Saygılarımla,

Ahmet Yenginoğlu

Zaten öyle görünüyor. Tam olarak açar mısınız nasıl bir yürüyen no olacak?

Sayın @yenginoglu
Formdaki demek istiyorsunuz sanırım.

Yeni Modül oluşturup alttaki kodları ekleyin. Daha sonra da Formdaki MADDENO Metin Kutusu Denetim Kaynağına =SiraNo([Form]) yazın.

Public Function SiraNo(frm As Form) As Variant

On Error GoTo Err_SiraNo

With frm.RecordsetClone

If .RecordCount = .AbsolutePosition + 1 Then Exit Function

 .Bookmark = frm.Bookmark

SiraNo = .AbsolutePosition + 1

End With



Exit_SiraNo:

Exit Function



Err_SiraNo:



If Err.Number <> 3021 Then

SiraNo = Null

Resume Exit_SiraNo

Else

Exit Function

End If

End Function

sayın Mehmet Demiral hocam
her ay gelirleri aylık aylık yazdıracağımdan önceki ay son numarasını takip etmesi yani 01.01.2022 - 31.01.2022 tarihleri arası rapor yazdırıldığında son sıra numarası 53 oluyor 01.02.2022 - 28.02.2022 tarihleri arası rapor istendiğinde 54 ten başlamasını istiyorum.


Saygılarımla,

Ekteki dosyayı inceler misiniz?

ocak ayı için bahsettiğiniz gibi 53 kayıt var
şubat için 54ten başla demişsiniz ama aralık ayındaki kayıtlar ne olacak?
her ay bir önceki ayın kayıt sayısı göz önünde bulundurulacaksa ocak ayı neden 1 den başlıyor
bu başlama neye göre belirlenecek?
yada siz diyelim ki 13-ocak 27 şubat arası bir tarih aralığı girdiğinizde hangi sayıdan başlayacak?