Ölçüte Göre Pdf Çıktı

Merhabalar,

Ekli örneğimde Formdaki Komut11 butonuna basınca raporumu gayet güzel pdf çıktı olarak alıyorum. Ancak ben tüm kayıtları değil, o an formda hangi kimlik değeri varsa o kimliğe ait verilerin çıktısını pdf olarak almak istiyorum. Yani kritere göre sorgu çalışacak ve raporda çıktı verecek. DoCmd ile ilgili uygulamalarda
şeklindeki kriterle bu yapılıyor ama örneğimdeki kodun içine bu kodu yediremedim. Yerdımcı olur musunuz? Tşk.

Docmd.outputto işlecine kriter ekleyemezsiniz.

Önce raporu açtırmanız daha sonra dışa aktarmanız gerekli.

    Dim GRaporAdi As String

    Dim GPdfDosya As String

    Dim GKriter As String

    

    GRaporAdi = "Tablo1"

    GPdfDosya = CurrentProject.Path & "\Tablo1.pdf"

    GKriter = "Kimlik = " & Me.Kimlik

    

    DoCmd.OpenReport GRaporAdi, acViewPreview, , GKriter, acHidden

    DoCmd.OutputTo acOutputReport, GRaporAdi, acFormatPDF, GPdfDosya

    DoCmd.Close acReport, GRaporAdi, acSaveNo

(18/10/2020, 19:56)ozanakkaya yazdı: Docmd.outputto işlecine kriter ekleyemezsiniz.

Önce raporu açtırmanız daha sonra dışa aktarmanız gerekli.

    Dim GRaporAdi As String

    Dim GPdfDosya As String

    Dim GKriter As String

    

    GRaporAdi = "Tablo1"

    GPdfDosya = CurrentProject.Path & "\Tablo1.pdf"

    GKriter = "Kimlik = " & Me.Kimlik

    

    DoCmd.OpenReport GRaporAdi, acViewPreview, , GKriter, acHidden

    DoCmd.OutputTo acOutputReport, GRaporAdi, acFormatPDF, GPdfDosya

    DoCmd.Close acReport, GRaporAdi, acSaveNo

Evet. şimdi daha iyi anladım. Çok teşekkürler.