Function GelirGiderGunYenile()
    [Forms]![frmTest]![gün].Requery
End Function
Sonra macro kısmına geçip, KAYITYENİ adlı macroda yeni satıra RunCode deyip,
Function name olarak GelirGiderGunYenile() yazın.
Function GelirGiderGunYenile()
    [Forms]![frmTest]![gün].Requery
End Function