Raporda kenar boşluklarını kodla nasıl sıfırlayabilirim. Her seferinde başka pc kurduğumda yazdırma seçeneklerini sıfırlıyorum.
Kodla daha nasıl pratik yapılabilir. Yardımlarınız için şimdiden teşekkürler.
![[Resim: do.php?imgf=d06a142a817b1.png]](https://accesstr.net/resim/do.php?imgf=d06a142a817b1.png)
DoCmd.OpenReport "raporadı", acViewPreview
With Reports!raporadı.Printer
.TopMargin = 0 'üst aralık
.BottomMargin = 0 'alt aralık
.LeftMargin = 0 'sol aralık
.RightMargin = 0 'sağ aralık
End With
DoCmd.OpenReport "raporadı", acViewNormal
DoCmd.OpenReport "raporadı", acViewPreview
With Reports!raporadı.Printer
.TopMargin = 0 'üst aralık
.BottomMargin = 0 'alt aralık
.LeftMargin = 0 'sol aralık
.RightMargin = 0 'sağ aralık
End With
DoCmd.Save acReport, "raporadı"