önizleme ve yazdırmada problem

[dilara01s]

sayın modalı ektekı dosyadakı problem oan ekrandakı kayıtlı kısının onızlemede gozukmemesı ve yazıcıya gıtmemesı yardımcı olursanız sevınırım sımdıden kolay gelsın.

 

[modalı]

Sayın dilara01s,

Raporu açtığınız forma bir metin kutusu ekleyin görünmez olarak ayarlayın ve veri kısmından tablonun Kimlik alanı ile ilişkilendirin.

Daha sonra formun kod sayfasını açın ve raporu ön izleme düğümesinin kodlarını şu şekilde değiştirin:

Private Sub Komut107_Click()
On Error GoTo Err_Komut107_Click
    Dim stDocName As String
    Dim strWhere As String
    strWhere = "Kimlik=" & Me.txtKimlikNo
    stDocName = "rapor test"
    DoCmd.OpenReport stDocName, acPreview, , strWhere
Exit_Komut107_Click:
    Exit Sub
Err_Komut107_Click:
    MsgBox Err.Description
    Resume Exit_Komut107_Click
    
End Sub

Buraya bir strWhere cümlesi ekledim bu da raporu o an forumda geçerli olan kayıda göre açıyor.

İyi çalışmalar