AccessTr.neT
Uygulamanın sayfa yapısı hakkında yardım - Baskı Önizleme

+- 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ığı: Uygulamanın sayfa yapısı hakkında yardım (/konu-uygulamanin-sayfa-yapisi-hakkinda-yardim.html)



Uygulamanın sayfa yapısı hakkında yardım - QATLET - 03/08/2012

Merhabalar;

[Resim: do.php?img=3584]

Bir Access uygulamasının sayfa yapısını ( kenar boşlukları " tümü 10"- sayfa boyutu " A4"- dikey / yatay "dikey") düzenleyebileceğim bir kod varmıdır ?

iyi günler.


Cvp: Uygulamanın sayfa yapısı hakkında yardım - Seruz - 03/08/2012

Araçlar - Seçenekler - Genel sekmesine bakın. Orada Kenar Boşluklarını varsayılan olarak ayarlayabilirsiniz. (Orada birim cm olabilir, sayfa yapısında mm'dir, dikkat edin)
Sayfa boyutu (A4) kısmı kullandığınız yazıcı ve onun ayarları ile ilgili olması lazım.


Cvp: Uygulamanın sayfa yapısı hakkında yardım - QATLET - 06/08/2012

Bu işlemi bahsettiğiniz şekilde değilde kod yazarak yapabilmemiz mümkün değilmi.


Cvp: Uygulamanın sayfa yapısı hakkında yardım - Seruz - 06/08/2012

Bu kodlar Access'in Araçlar-Seçenekler menüsündeki Marginlerin kodu:
'Print margins, Left margin
Application.SetOption "Left Margin", "1cm"

'Print margins, Right margin
Application.SetOption "Right Margin", "1cm"

'Print margins, Top margin
Application.SetOption "Top Margin", "1cm"

'Print margins, Bottom margin
Application.SetOption "Bottom Margin", "1cm"



Bu kodlar sadece istenilen rapor için geçerli.
Private Sub Report_Open(Cancel As Integer)

Me.Printer.PaperSize = acPRPSA4 'A4 kağıt boyutu
Me.Printer.BottomMargin = 10
Me.Printer.TopMargin = 10
Me.Printer.LeftMargin = 10
Me.Printer.RightMargin = 10

End Sub



Cvp: Uygulamanın sayfa yapısı hakkında yardım - QATLET - 07/08/2012

Çok teşekkürler. Bu kodlar işimi gördü.