+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: İki Taraflı Yazdırma (/konu-iki-tarafli-yazdirma.html)
İki Taraflı Yazdırma - fenerli6774 - 26/08/2021
Kolay gelsin. Herkese iyi çalışmalar.
İki sayfalık herhangi bir raporu çift taraflı yazdırma kodu olan var mı?
Varsa paylaşabilir mi?
RE: İki Taraflı Yazdırma - hegu - 27/08/2021
https://accesstr.net/konu-rapor-verilerini-yan-yana-sayfaya-doldurmak.html?highlight=yan+yana
bu konuyu inceler misin. işine yarar inşallah
RE: İki Taraflı Yazdırma - fenerli6774 - 27/08/2021
Teşekkür ederim.
Ben arkalı önlü yazdırmak istiyorum.
RE: İki Taraflı Yazdırma - hegu - 27/08/2021
Bazı yazıcıların o özelliği var. Yazıcın da o özellik varsa arkalı önlü yazar.
https://accesstr.net/konu-cift-tarafli-yazdirma.html?highlight=arkal%C4%B1+%C3%B6nl%C3%BC
Bir de bu konuya bak.
RE: İki Taraflı Yazdırma - fenerli6774 - 26/09/2021
Çift taraflı yazdırmak için Araştırmalarım sonucunda şöyle bir şey buldum:
Yazdır butonunun olay sekmesine tıklatıldığında olayına;
On Error GoTo Yazdır_Click
Dim strReport As String 'rprİmzakontrolformu'
strReport = "rprİmzakontrolformu"
Dim rpt As Access.Report
Dim prtr As Access.Printer
Set Application.Printer = Nothing
Set prtr = Application.Printer
prtr.Duplex = acPRDPHorizontal
Set rpt = Reports(strReport)
Set rpt.Printer = prtr
prtr.Copies = 1
DoCmd.OpenReport strReport, acNormal
DoCmd.Close
Exit_Yazdır_Click:
Exit Sub
Yazdır_Click:
MsgBox Err.Description
Resume Exit_Yazdır_Click
DoCmd.Close acReport, "rprİmzakontrolformu"
DoCmd.OpenForm "frmKayıtbilgileri"
Konuyu cevaplanmış sorulara taşıyabilirz. Teşekkür edderim
RE: İki Taraflı Yazdırma - berduş - 26/09/2021
çözümü paylaştığınız için teşekkürler
iyi çalışmalar