Müşteri bilgileri formundaki genel extre butonunun olay yordamındaki kodları bu kodlarla değiştirin sizin prg deki butona tıklayınca olay yordamı direk raporu açtırıyor oysaki form1 i açacak orda tarihleri girdikten sonra raporu açacak
Private Sub Komut111_Click()
On Error GoTo Err_Komut111_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Form1"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Komut111_Click:
Exit Sub
Err_Komut111_Click:
MsgBox Err.Description
Resume Exit_Komut111_Click
End Sub
#4
