Skip to main content

AccessTr.neT


Bir kayıt grubunu işaretlemek

Bir kayıt grubunu işaretlemek

Çözüldü #15
Ancak fırsat bulup bakabildim ve tüm mesajları baştan tekrar okudum.

Alıntı:Arkadaşlar bir sürekli form üzerine çağırdığım kayıtların "bazılarını" checkbox ile işaretlemek ve bu bloğa bir eylem yapmak istiyorum. (Güncellemek, silmek, vb ) Bunu sorgu filtreleri ile yapmak elbette mümkün ama benim istediğim "tek tek seçim".
Buraya kadar tamam. Kayıtların bir listesini görüp onların arasından bazılarını seçmek ve bu seçilen kayıtlar üzerinden işlem yapmak istiyorsunuz.

Alıntı:Bu checkbox u tabloda bir alan olarak tutarsam çok kullanıcı ortamda ayni anda ayni işi yapan kişi diğer kullanıcının işaretlediği kayıtları da işaretlenmiş olarak görüyor.
Bu da tamam, tabloda işaretlerseniz, tüm kullanıcılar görür.

Bu nedenle, ListBox'ta çoklu seçim ile veya ListView'da CheckBox kullanarak yapılabilir. Böylece kullanıcılar birbirlerinin seçimlerini görmezler.

---
ListBox'ta toplu seçim yapmak ve seçilenlerin üzerinde işlem yapmak için, Sn. CELOYCE'nin gönderdiği (benim daha önce yapmış olduğum bir örnek) dosya işinizi görür. (Ayrıca bende ekledim son halini)

Bu işlem için asıl gerekli kodlar şu şekilde:
Kod:
For Each PID In Me.Parca_Listesi.ItemsSelected
        SQL = "UPDATE ANAPARCA SET SECILI = -1 WHERE ANAPARCA_ID = " & Me.Parca_Listesi.ItemData(PID)
        DoCmd.RunSQL SQL
        Me.Parca_Listesi.Selected(PID) = False
    Next PID

ListBox'ın .ItemsSelected özelliği kullanılıyor

---
ListView'de checkbox ile seçim yapmak ve seçilenlerin üzerinde işlem yapmak için, Sn. Krizantem'in gönderdiği sn. Bilgisayarcı'ya ait örnek dosya işinizi görür. Kodları bende inceledim şimdi. Animasyonlu olduğu için kodlar biraz karışık gibi görünüyor. Ancak sizin kullanmanız gereken, seçilen kayıtlarla ilgili işlem yapan kısım şu (ListedekileriAl Fonksiyonu):
Kod:
Private Sub ListedekileriAl()
Dim Item As ListItem
Dim i As Long
Dim mesaj As String
    For i = 1 To Me.ListView1.ListItems.Count
      Set Item = Me.ListView1.ListItems.Item(i)
      If Item.Checked Then
        If Len(mesaj) = 0 Then mesaj = Item.Tag Else mesaj = mesaj & ";" & Item.Tag
      End If
    Next
  If Len(mesaj) > 0 Then MsgBox mesaj
End Sub

ListView'ın Checked özelliği kontrol ediliyor.
--
Birde sonradan şunu yazmışsınız:
Alıntı:hocam liste kutusundan çoklu seçim ile tabloya aktarmak için ardımcı olursanız elbette olur, benim derdim kayıtları tek tek listeden seçip yeni tablo yaratmak.

Kayıtları seçip bir tablo yaratırsanız, çok kullanıcılı ortamda diğer kullanıcılar da seçilenleri görecektir. Bunun için kullanıcı kodlarını da tabloya yazıp, kullanıcı bazında filtre yapmanız lazım, onu hatırlatayım.
--

ListView veya ListBox'tan istediğinizi kullanabilirsiniz.
Örnek dosyanız olmadığı için kodları kendinize sizin uyarlamanız gerekecek.
Takıldığınız yerde tekrar yardımcı olurum.

Saygılarımla,
.rar ListBox_TopluSecim_Seruz.rar (Dosya Boyutu: 33,04 KB | İndirme Sayısı: 56)
.rar ListView_CheckBox_Seruz.rar (Dosya Boyutu: 31,08 KB | İndirme Sayısı: 53)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Bir kayıt grubunu işaretlemek - Yazar: okileturc - 25/03/2009, 15:00
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 25/03/2009, 15:21
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 25/03/2009, 16:57
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 25/03/2009, 17:01
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 25/03/2009, 21:20
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Krizantem - 25/03/2009, 21:54
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 25/03/2009, 22:17
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 25/03/2009, 23:39
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 25/03/2009, 23:54
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 25/03/2009, 23:59
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 26/03/2009, 11:00
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 26/03/2009, 11:39
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 26/03/2009, 17:59
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 26/03/2009, 18:11
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 26/03/2009, 18:27
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 26/03/2009, 18:32
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 26/03/2009, 18:46
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 26/03/2009, 19:47
Cvp: Bir kayıt grubunu işaretlemek - Yazar: firdevs - 26/03/2009, 23:36
Cvp: Bir kayıt grubunu işaretlemek - Yazar: esrefigit - 27/03/2009, 08:41
Cvp: Bir kayıt grubunu işaretlemek - Yazar: Seruz - 27/03/2009, 10:40
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 27/03/2009, 16:36
Cvp: Bir kayıt grubunu işaretlemek - Yazar: firdevs - 28/03/2009, 00:45
Cvp: Bir kayıt grubunu işaretlemek - Yazar: okileturc - 28/03/2009, 01:24
Cvp: Bir kayıt grubunu işaretlemek - Yazar: firdevs - 28/03/2009, 12:54
Cvp: Bir kayıt grubunu işaretlemek - Yazar: umutap - 15/10/2009, 08:45
Task