sayın arkadaşlar. çalışmamda Access penceresi gizleme kodu kullanıyorum. formda listeden seçtiğim kaydın raporunu açıyorum. ancak mouse sağ click açılmadığı için yazıcıya gönderemiyorum. kullandığım kodlar aşağıda. nerde hata yapıyorum acaba.


Kodlar;
Private Sub Komut41_Click()

If Liste2.ItemsSelected.Count = 0 Then: MsgBox "MsgBox "Lütfen raporu çıkarılacak kayıt seçin...", vbInformation, " ": Exit Sub

1. deneme : DoCmd.OpenReport "R_SONUÇ", acPreview, , "NumuneNo='" & Me.Liste2.Column(6) & "'"

2. deneme : DoCmd.OpenReport "R_SONUÇ", acViewReport, acNormal, "NumuneNo='" & Me.Liste2.Column(6) & "'"
3. deneme : DoCmd.OpenReport "R_SONUÇ", acViewPreview, acNormal, "NumuneNo='" & Me.Liste2.Column(6) & "'"
4. deneme : DoCmd.OpenReport "R_SONUÇ", acPreview, , "NumuneNo='" & Me.Liste2.Column(6) & "'"
5. deneme : DoCmd.OpenReport "R_SONUÇ", acViewPreview, "", , acNormal, "NumuneNo='" & Me.Liste2.Column(6) & "'"

bu kodların hepsinde rapor açılıyor ancak mouse sağ click çalımadığı için çıktı alamıyorum.

Rapor açıldı olayı kodu

Private Sub Report_Open(Cancel As Integer)

DoCmd.Maximize

End Sub


yardımcı olunursa çok sevinirim. saygılar.

eğer diğer bir konunuzda önerdiğim, gizleme olarak eklediğiniz kodu tersine çevirmezseniz sağ tıklama çalışmaz.

konu budur. https://accesstr.net/konu-raporlarda-sag...#pid190039