Skip to main content

#EvdeKal


Raporda Kenar Boşluklarını Sıfırlama

Raporda Kenar Boşluklarını Sıfırlama

Çözüldü #1
Merhaba Arkadaşlar,
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]
Cevapla
#2
Formların boyutlarını alttaki kodla belirliyorum siz raporun açıldığında olay yordamına yazarak bir deneyin

Private Sub Form_Load()
On Error Resume Next
    DoCmd.MoveSize , , 5000, 3000
    Me.Caption = "FORM BAŞLIIGI"
HataBul (Err.Number)
End Sub
Cevapla
#3
aşağıdaki kodu yazdır butonuna ekleyip dener misiniz

Visual Basic Code
       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

Cevapla
#4
Teşekkürler denedim oldu. Ancak bunu kaydetme olayı olsa dahi iyi olurdu. her seferinde butona tıklayınca ayar yapıyor.
Cevapla
#5
kodu aşağıdaki ile değiştirip dener misiniz

Visual Basic Code
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ı"

Cevapla
#6
(04/04/2019 12:22)haliliyas Adlı Kullanıcıdan Alıntı: kodu aşağıdaki ile değiştirip dener misiniz

Visual Basic Code
Denedim olmadı :(

[Resim: do.php?imgf=a4a96d4129d01.png]
Son Düzenleme: 04/04/2019, 13:32, Düzenleyen: sertac76.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da