[VBA] Liste Kutusunda tablo evet/hayır alanını işaretlemek
#1
Merhaba, ekteki küçük örnekte liste kutusunda hangi kaydı çift tıklarsam sil alanı Evet ise Hayır, Hayır ise Evet olarak işaretlemek istiyorum ancak yapamadım. Sanırım değişken atamada başarısızım. Yardım edebilirseniz çok makbule geçer.


Eklenti Dosyaları
.rar   Örnek.rar (Boyut: 84,61 KB / İndirilme: 86)



  Alıntı
Bu mesajı beğenenler:
#2
Visual Basic
  1. Private Sub Liste22_Click()
  2. Dim rs As Recordset
  3. Set rs = Me.RecordsetClone
  4. rs.FindFirst "[Id] = " & CLng(Me.Liste22.Column(0))
  5. If Not rs.EOF Then Me.Bookmark = rs.Bookmark
  6. rs.Edit
  7. rs!Sil = IIf(rs!Sil = 0, -1, 0)
  8. rs.Update
  9. rs.Close
  10. Me.Liste22.Requery
  11. Me.Etiket1.Caption = "DÜZENLE"
  12. Me.Etiket2.Caption = "DÜZENLE"
  13. End Sub



VBA proseduru ile yapilabilir.



  Alıntı
Bu mesajı beğenenler:
#3
Teşekkür ederim Sayın Hocam.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Sürekli Formda Belli Bir Sütundaki Satırları Tek Bir Metin Kutusunda Birleştirme dormin 4 206 18-01-2023, 14:29
Son Mesaj: dormin
  Liste Kutusunda Arama uzays 2 236 12-01-2023, 16:14
Son Mesaj: uzays
  [FORM] Formda Kayıt Ve Ilişki Oluşturma, Kayıtların Metin Kutusunda Gözükmesi fx41 26 1.143 12-10-2022, 11:00
Son Mesaj: dsezgin
  [VBA] Mesaj Kutusunda Tüm Verilerin Görülmesi tamersyilmaz 4 175 10-10-2022, 18:58
Son Mesaj: tamersyilmaz
  [FORM] Combobox Evet Hayır Seçiminde Açılan Kutuya Zorunlu Veri Girişi Mesajı Gelmesi. DENTAVAX 12 462 17-07-2022, 20:51
Son Mesaj: DENTAVAX
  liste kutusunda güncelleştirme muhittinibrahim 11 5.130 05-06-2022, 20:00
Son Mesaj: onur_can
  [RAPOR] Evet/hayır Durumunda Rapor'a çıktı Yazırmak. daghanx 15 451 27-02-2022, 15:22
Son Mesaj: onur_can
  [FORM] Liste Kutusundaki Kaydın Onayı Sonrası Liste Kutusunda Son Satıra Gidiyor husem 6 434 11-11-2021, 16:27
Son Mesaj: husem

Foruma Git:


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