Fakat şöyle bir durum var,

Private Sub Komut48_Click()

On Error GoTo Err_Komut48_Click



    Dim stDocName As String



    stDocName = "Izin"

    DoCmd.OpenReport stDocName, acPreview

Exit_Komut48_Click:

    Exit Sub



Err_Komut48_Click:

    MsgBox Err.Description

    Resume Exit_Komut48_Click

    

End Sub

Mesela bu kod ile istediğim gibi geliyor Rapor üstte çıkıyor. Ama diğer tarafta çıkmıyor.