Raporda Dolu Satırlar - Baskı Önizleme

Raporda Dolu Satırlar - 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ığı: Raporda Dolu Satırlar (/konu-raporda-dolu-satirlar.html)

Raporda Dolu Satırlar - oosmaner - 16/11/2020

İyi akşamlar:
Raporda 9 satırdan oluşan alanım var .Burada dolu olan satırların rapora yansımasını istiyorum. Nasıl yapabilirim .Örnek link varsa alabilir miyim. Teşekkür ederim.

RE: Raporda Dolu Satırlar - ozanakkaya - 17/11/2020

Merhaba, raporun ayrıntı özelliğinin biçimlendiğinde olayına

Dim GSayi As Integer



If Me.Alan.Value = "" Or IsNull(Me.Alan) Then



    Me.Alan.Visible = False

    Me.Alan_Etiket.Visible = False



End If



For GSayi = 1 To 10



    If Controls("Alan" & GSayi).Value = "" Or IsNull(Controls("Alan" & GSayi).Value) Then

    

        Controls("Alan" & GSayi).Visible = False

        Controls("Alan" & GSayi & "_Etiket").Visible = False

    

    End If



Next GSayi

kodu eklemek işinizi görecek mi? Raporu baskı önizlemede açmalısınız.

RE: Raporda Dolu Satırlar - oosmaner - 17/11/2020

(17/11/2020, 00:15)ozanakkaya yazdı: Merhaba, raporun ayrıntı özelliğinin biçimlendiğinde olayına

Dim GSayi As Integer



If Me.Alan.Value = "" Or IsNull(Me.Alan) Then



    Me.Alan.Visible = False

    Me.Alan_Etiket.Visible = False



End If



For GSayi = 1 To 10



    If Controls("Alan" & GSayi).Value = "" Or IsNull(Controls("Alan" & GSayi).Value) Then

    

        Controls("Alan" & GSayi).Visible = False

        Controls("Alan" & GSayi & "_Etiket").Visible = False

    

    End If



Next GSayi

kodu eklemek işinizi görecek mi? Raporu baskı önizlemede açmalısınız.

teşekkür ederim ..çok sağolun