Örneğiniz olmadığından varsayımsal ifade ediyorum. Çok basitçe raporunuzun açılış olayına yeni kayıt kaynağı işaret etmek için bir RecordSource çağrısı eklemeniz yeterli. Örnek kod şöyle olabilir:
' Raporu Açmak İçin
DoCmd.OpenReport "Raporunuz", acViewReport
' Kayıt Kaynağını belirtmek için
Reports![Raporunuz].Report.RecordSource = "srg_tarih = "SELECT TRAS_SEVK_LISTESI.* From TRAS_SEVK_LISTESI WHERE (((TRAS_SEVK_LISTESI.KAYIT_TARIHI)=[Formlar]![RAPOR]![TARIH]))"