Küçültme

[53rize]

Acceste yapmış olduğumuz işleri örneğin raporlamalar bunları baskı önizlemesine girdiğimiz zaman Baskı önizlemesi görülen sayfanın nasıl excell tablosunun sayfa yapısı ölçek olarak küçültülüp büyültülebilyorsa bunu accesste nasıl yapabiliriz. sayfa çıktı düzenlemesi. Bir diğer sorumda accesste raporun baskı önizlemesine girdiğimde sayfalar örneğin 10 sayfa varsa hepsi görünmüyor. Bir dolu bir boş bir dolu sayfa görünüyor. sayfa yapısına baktığımda sayfa dışınada taşmıyor.

 

[modalı]

Sayın 53rize,

Açılacak olan rapor ön izlemeyi aşağıdaki fonksiyon ile açabilirsiniz ve ZoomCoeff değikeni 0 ile 2500 arası bir değer seçebilirsiniz. Deneme yanılmayla uygun sayıları açılan kutudan alabilirsiniz.

Function PreviewAndZoomReport(ReportName As String, ZoomCoeff As Integer)
On Error GoTo Error_Handler
 
    If Not (ZoomCoeff >= 0 And ZoomCoeff <= 2500) Then
        ZoomCoeff = 0
    End If
 
    With DoCmd
        .OpenReport ReportName, View:=acViewPreview
        .Maximize
    End With
    Reports(ReportName).ZoomControl = ZoomCoeff
 
    Exit Function
Error_Handler:
    MsgBox Err.Description
    Resume Next
End Function

Fonksiyonu kullanımı ise:

Call PreviewAndZoomReport("RaporunuzunAdı", 0-ile 2500 arası bir sayı)

Diğer sorununuzda ise mutlaka taşan bir kısım vardır. Rapor kenar ayarlarını kü
çültüp deneyin.

İyi çalışmalar

 

[53rize]

Çok özür dilerim. Bu accesste yabancı olduğum için yazmış olduğunuz bu kodu nereye yapıştıracağım. Düğme atayıp ona macro olarak mı yapıştıracağım. Biraz daha detay verirseniz sevineceğim şimdiden teşekkür ederim.

 

[modalı]

Sayın 53rize,

Örnek ekliyorum.

Fonksiyon kodlarını bir modüle kopyalayın.

Bir form hazırlayın ve açılan kutudan boyutu seçin ve düğümeye basın.

Düğümenin kodlarını incelerseniz fonksiyonun nasıl kullanıldığını anlarsınız.

İyi çalışmalar