Merhaba,

Ekte gönderdiğim dosyada master data formunda bulunan tarih etiketine yazdığım tarihin diğer üç alt formda aynı tarih ile filtre yapmasını istiyorum.Kutu boş iken bütün bütün kayıtları gösterecek, örneğin 05/06/2023 tarihini kutuya yazdığımda ise üç alt formdaki sadece 05/06/2023 tarihli kayıtları göstermesini istiyorum. İstediğim formatın ekran resmini de ekledim.

Teşekkürler

tarih güncelleme sonrası olayını aşağıdaki gibi düzenleyip dener misiniz?

Private Sub date_AfterUpdate()

'hy_AltForm Filtreleme

StrFiltre1 = ""

StrFiltre2 = ""

StrFiltre3 = ""

If Len(Me.date) > 0 Then

    StrFiltre1 = "int(sDate)=" & CLng(Me.date)

    StrFiltre2 = "int([sDate Field])=" & CLng(Me.date)

    StrFiltre3 = "int([sDate Field])=" & CLng(Me.date)



    Me.[Query1 subform].Form.Filter = StrFiltre1

    Me.[Query1 subform].Form.FilterOn = True



    Me.[Find duplicates for IN].Form.Filter = StrFiltre2

    Me.[Find duplicates for IN].Form.FilterOn = True



    Me.[Find duplicates for Out].Form.Filter = StrFiltre3

    Me.[Find duplicates for Out].Form.FilterOn = True

Else

    Me.[Query1 subform].Form.FilterOn = False

    Me.[Find duplicates for IN].Form.FilterOn = False

    Me.[Find duplicates for Out].Form.FilterOn = False



End If



End Sub