merhaba arkadaşlar.
5 ad. farklı boyutlarda raporum var. boyutları farklı 3 ad. yazıcım var. isteğim raporu istediğim yazıcıya atmak istiyorum raporun içinden yazıcı seçebilirmiyiz.

Private Sub cmdPrint_Click()
' Raporun açık olup olmadığı kontrol ediliyor - Bu kontrol gerekirse kaldırılabilir.
If CurrentProject.AllReports("Raporunuzun adı").IsLoaded Then
' Rapor zaten açıksa, direkt print ediliyor.
DoCmd.OpenReport Me!lbxSelectReport, acViewNormal
Else
' İstediğiniz yazıcıyı ayarlıyorsunuz
Application.Printer = Application.Printers("Yazıcının İsmi")
' Rapor yazdırılıyor.
DoCmd.OpenReport "Raporunuzun adı", acViewNormal
' Yazıcı, varsayılana geri döndürülüyor
Set Application.Printer = Nothing
End If
End Sub