Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [VBA] Liste Den Kayıt Seçme Ve Yazdırma Yada Listeden Kayıt Seçim Buton Ile Yazdırma

[VBA] Liste Den Kayıt Seçme Ve Yazdırma Yada Listeden Kayıt Seçim Buton Ile Yazdırma
Ahmet51
Önemli Üye 200-300

*
Kayıt Tarihi: 22.03.2011
Toplam 56 konu açtı.
Toplam 283 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016,
Beğeniler: 0 / 0
#1
09-02-2020, 15:31 (En son düzenleme: 09-02-2020, 15:41 Ahmet51.)
Saygı değer üstadlarım öncelikle saygı ve sevgiler sunarım.

Ekli Vt'de "KayıtYazdır" isimli bir forum var ve bu forum içerisinde kayıt kaynağı Yzd_Sorgu dan alan Liste var. Bu listeden istenen kaydın yazdırılması gerekmektedir. Ancak Listede hangi satıra çifttıklanır ise tıklansın  "Çifttıklandığı" olayında sürekli ilk satır Rapora gelmektedir. Ayrıca üstte iki adet buton mevcut "Çıkış Raporu" ve "Giriş Raporu" olmak üzere ancak bu butonlara kod yazamadım.

Siz saygı değer hocalarımdan isteğim şu dur;

Listeye "Çifttıklandığında" olayına listeden tıklanan satırı yazdırabilmek; bu mümkün değil ise
Listeden satır seçip işlem Çıkış ise "Çıkış Raporu" butonu ile; işlem Giriş ise "Giriş Raporu" butonu ile rapor alabilmek

Bu konuda yardım edebilir iseniz çok memnun olurum.

Şimdiden siz değerli hocalarıma teşekkürlerimi sunarım.

Kullanıcı  Ali Şifre 1 dir.

Shift tuşu ile doğrudan içeriğe girilmektedir.


.rar   EMANET KASASI DENEME.rar (Boyut: 373,29 KB / İndirilme: 79)



  Bul
  Alıntı
Bu mesajı beğenenler:
onur_can
Kıdemli Üye >1000

*
Kayıt Tarihi: 01.01.2009
Toplam 151 konu açtı.
Toplam 5.511 yorum yaptı.
Toplam 261 puanı bulunmakta.
Beğeniler: 10 / 76
#2
09-02-2020, 16:54
Eki inceleyiniz.


Eklenti Dosyaları
.rar   EMANET KASASI DENEME_can.rar (Boyut: 338,14 KB / İndirilme: 91)



  Bul
  Alıntı
Bu mesajı beğenenler:
Ahmet51
Önemli Üye 200-300

*
Kayıt Tarihi: 22.03.2011
Toplam 56 konu açtı.
Toplam 283 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016,
Beğeniler: 0 / 0
#3
10-02-2020, 09:08
(09-02-2020, 16:54)onur_can demiş ki: Eki inceleyiniz.


Onur hocam  öncelikle emeğinize sağlık teşekkür ederim.

Örneği inceledim ancak her halukarda Giriş Raporunu açmaktadır. Çıkış Raporunu açmıyor hocam.



  Bul
  Alıntı
Bu mesajı beğenenler:
onur_can
Kıdemli Üye >1000

*
Kayıt Tarihi: 01.01.2009
Toplam 151 konu açtı.
Toplam 5.511 yorum yaptı.
Toplam 261 puanı bulunmakta.
Beğeniler: 10 / 76
#4
10-02-2020, 12:28
Evet dediğiniz gibi, bu durum ilk kaydı referans alarak yapıyor. Aşağıdaki kodu Listenin DblClick Olayına yapıştırın sorun düzelecektir.

Visual Basic
  1. Private Sub Liste_DblClick(Cancel As Integer)
  2.  
  3. If Me.Liste.Column(3) = "Giriş" Then
  4. DoCmd.OpenReport "Giriş_Raporu", acViewPreview
  5. ElseIf Me.Liste.Column(3) = "Çıkış" Then
  6. DoCmd.OpenReport "Çıkış_Raporu", acViewPreview
  7. Else
  8. End If
  9.  
  10. End Sub


Bu arada şunu da belirteyim, form tasarımınız güzel olmuş.



  Bul
  Alıntı
Bu mesajı beğenenler:
Ahmet51
Önemli Üye 200-300

*
Kayıt Tarihi: 22.03.2011
Toplam 56 konu açtı.
Toplam 283 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016,
Beğeniler: 0 / 0
#5
10-02-2020, 14:41 (En son düzenleme: 10-02-2020, 14:44 Ahmet51.)
Onur Hocam çok teşekkür ederim. Emağine sağlık

Onur hocam sistemde yapmış olduğum yansıma a tablosu işlevi yapmıyor. Yani yeni bir giriş çıkış işlemi yapınca kayıtlara yansımadı.

Tbl_Yansıma diye bir tablo oluşturdum. FrmAna Formuna Hesapla kodu yazdım. İşlem 10 numara oldu bakiye işlemi olayını bu şekilde hallettim.

Bu nedenle seneryoyu değiştirdim. FrmAna da kişiyi çağırıp Rapor Yazdır düğmesine basınca KayıtYazdır formu açılıyor ve FrmAna da çağrılan kişinin kayıtlarını getiriyor. Buraya kadar sorun yok. Sizin çifttıklama olayını bu vt ye uyguladım ancak yine aynı sorun devam ediyor. İlk kayıttaki giriş kaydını veriyor.

Hocam kusura bakmayın sizi de yordum bu konuda VT yi ekliyorum bir bakabilir iseniz çok sevinirim. Dahada olmuyor ise Listeden kaydı seçip buton ile yazdırma işlemi yapmaya çalışalım.


.rar   EMANET KASASI DENEME.rar (Boyut: 383,24 KB / İndirilme: 58)



  Bul
  Alıntı
Bu mesajı beğenenler:
onur_can
Kıdemli Üye >1000

*
Kayıt Tarihi: 01.01.2009
Toplam 151 konu açtı.
Toplam 5.511 yorum yaptı.
Toplam 261 puanı bulunmakta.
Beğeniler: 10 / 76
#6
10-02-2020, 16:04
Rapor satır kaynaklarını düzenlememişsiniz, eki inceleyiniz Ahmet Bey


Eklenti Dosyaları
.rar   EMANET KASASI DENEME_düzeltilen.rar (Boyut: 377,59 KB / İndirilme: 73)



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [VBA] Form Yüklendiğinde, Tüm Kayıt Durumu Güncellensin. programmer67 2 50 02-05-2024, 14:54
Son Mesaj: programmer67
  [FORM] Aktif Saati Tablodaki Saat Arasına Göre Bulup Forma Yazdırma yahyamacit 5 137 14-03-2024, 11:07
Son Mesaj: yahyamacit
  Form üzerinde Bulunan Sorguda Değişiklik Yaparak Kayıt Güncelleme geneclean 5 183 13-02-2024, 15:51
Son Mesaj: dsezgin
access-sql-18 Insert ile formdan tabloya kayıt ekleme Enigmatic 18 20.648 07-02-2024, 18:41
Son Mesaj: halil.tefci
  Raporda Tek Sayfada 2 Kayıt Gösterme adnnfrm 5 131 28-01-2024, 01:25
Son Mesaj: adnnfrm
  [FORM] Metin Kutusundaki Değere Göre Altforma Kayıt Eklensin Yada Eklenmesin ŞabanTR 4 170 17-12-2023, 17:40
Son Mesaj: ŞabanTR
  Virgülle Ayrılmış Verilerin Her Bir Değerini Yeni Kayıt Olarak Ekleme adnnfrm 5 168 28-11-2023, 01:37
Son Mesaj: dsezgin
  [VBA] Dosya Yolu Yazdırma benuva 2 120 26-11-2023, 19:06
Son Mesaj: benuva

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi