Konuyu Değerlendir
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5
[VBA] liste kutusunda tümünü seç
#1
Selam kıymetli hocalarım ,

İsim ve adres kaydettiğim bir tablom var. Bazı adresleri birden çok isime ve bazen tüm isimlere aynı anda kaydetmek istiyorum.

İsimlerin birden çok seçilebildiği bir açılan kutu kullanıyorum. Sorum şu; bu listenin en başına "tümü " satırı eklemek ve tıklandığında tüm isimleri seçmek istiyorum. Bunun için açılan listeye nasıl bir kod girmem gerekiyor?

İlginiz için şimdiden teşekkür ederim.

Saygılarımla..
Bul
Alıntı
#2
SELECT alanadi FROM tabloadi
UNION SELECT "(All)" FROM tabloadi;
Açılan kutunun kaynağına yukardaki kodu yazıp dener misiniz?
Bul
Alıntı
#3
sn. Halil İlyas,

Malesef çalışmıyor. Ekte örnek mevcut, listenin başına tümü yazdırmayı başardım ancak tıklandığında diğer satırları işaretlemiyor.


Eklenti Dosyaları
.zip   xx.zip (Boyut: 46,35 KB / İndirilme: 9)
Bul
Alıntı
#4
mause move olayına aşağıdaki kodu yazıp dener misiniz
Visual Basic
Private Sub isim_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
 
    If Me.isim.Selected(0) = True Then
        For X = 1 To Me.isim.ListCount - 1
        Me.isim.Selected(X) = True
        Next
    End If
 
End Sub


Bul
Alıntı
#5
Sn haliliyas'ın çözüm önerisine ek olarak ben de bir öneri eklemek istiyorum.
isim açılır kutusunun hemen yanına bir buton ekleyin ve ismini Tümü olarak adlandırın.
Bu butonun click olayına da aşağıdaki kodu ekleyin.
Visual Basic
Dim x As Integer
For x = 1 To Me.isim.ListCount - 1
Me.isim.SetFocus
Me.isim.Dropdown
Me.isim.Selected(x) = True
Next x



bu durumda listenizdeki Tümü seçeneğini kaldırabilirsiniz.

Kullanıcı İmzası
Tecrübe bütün öğretmenlerin en iyisidir.
Publilus Syrus

BLOG SİTEM
Access Makaleleri

YARDIMCI ARAÇ UYGULAMALARIM
1-Access Penceresini  Tek Tıklamayla Gizleme Uygulaması (UYGULAMA)
ARAYÜZ ÇALIŞMALARIM
1-GIF’li Ana Menü Uygulaması (MENU)
2-Başlangıç Ekranı (Bir sonraki Açılışta Bu Ekranı Göster/Gizle) (FORM)
3-Uygulama Ana ekranı (Otobüs Bilet Otomasyon) (MENU)
4-Web Menü Uygulaması (MENU)
5-Office Menü Uygulaması (ProgressBar+Şifre Ekranı)-(MENU)
6-Reklam Formu Uygulaması (FORM)
7-Ana Menü Oluşturma (Tablo Verileri Kullanarak) (MENU)
8-Etkileyici Formlar
9-Ana Menü Uygulaması
10- Kullanıcı Giriş Formu (Login Örneği)



Alıntı
#6
Sayın Onur ve Halil hocalarım,

Sağlık problemleri nedeniyle epeydir programla uğraşamadım. Her iki çözümü de deneyip sonucu paylaşacağım.

İlginiz için çok teşekkür ederim.

Saygılar...
Bul
Alıntı


İmlemeler

Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Liste kutusunda isteğe bağlı sıralama holyone 9 1.702 03-04-2019, 16:22
Son Mesaj: nekeba
access-sql-9 [FORM] Liste kutusunda sadece seçili kişiyi silme md79x 12 6.122 24-01-2019, 12:43
Son Mesaj: dsezgin
  [VBA] Liste Kutusuna Tıklandığında Diğer Liste Kutusundaki Verilerin Filtrelenmesi mmert06 4 220 29-12-2018, 00:11
Son Mesaj: mmert06
  [RAPOR] Metin kutusunda Kalın yazı milasanamur 2 191 14-12-2018, 16:27
Son Mesaj: milasanamur
  [FORM] İle varsa şeklinde aramak ve liste kutusunda aramak Orion 9 621 31-08-2018, 14:46
Son Mesaj: Orion
  [FORM] Sütundaki Son Veriyi Metin Kutusunda Göstermek. keremm 2 275 07-08-2018, 23:16
Son Mesaj: keremm
  [RAPOR] Liste kutusunda seçtiğim değerin raporunu açmak smartbutun@gmail.com 2 340 10-07-2018, 12:47
Son Mesaj: smartbutun@gmail.com
  [VBA] Liste Kutusunda Parametre Değeri Uyarısı mmert06 1 328 13-06-2018, 00:14
Son Mesaj: mmert06

Foruma Git:


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