Çözüldü Listbox'da access den veri çekerek 3 ayrı combobox ile tabloyu filtreleme

Bu sorun verilen destek sayesinde çözüme ulaştırılmıştır.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
Merhaba ,

Ekteki proğramımda gemba_giris sayfasından yeni kayıt atarak access e kaydediyorum. Sorna gemba_liste formuna giriş yapılınca vericek kodu ile anasayfa sheet'ine veriyi çekiyorum ve lsitbox da görüntülüyorum . Şuan filtrelemeler çalışıyor. Ancak gereksiz olan veriyi excelle çekmek .

Amacım gemba-liste formuna girince veritabanındaki bütün colonları getirmek üste bulunan comboboxlardan filtreleme yapmak . Yardımcı olabilir misiniz ?
 

Ekli dosyalar

  • Gemba.xlsm
    93.4 KB · Gösterim: 8
Çözüm
halily
aşağıdaki kodu dener misiniz?
yalnız açılır kutularınızda hata olabilir
1673807028167.png
gördüğünüz gibi tablonuzdaki değerle açılır kutu değerleri farklı
formdaki hangi alanın tablodaki hangi alana denk geldiğini bilemediğim için o kısmı kafama göre yaptım siz kendinize göre düzenlersiniz
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
Tarihe göre sırala Oylara göre sırala
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
arkadaşlar gemba_liste userformunda bulunan listbox a access den veri çekeceğim. detayları vereyim biraz aşağıdaki kod ile accessten listbox a veri alıyorum sadece ayrı combobox ile çektiğiö veriyi listbox üzerinde filtreleyeceğim yani bu sayede excell sayfaları ile ilişkiyi keseceğim.

Ama filtreleme yapamıyorum .Access veri tabanı ismi gemba.accdb tablosu gemba
Sütun baslıkları vermiyorum cunku aşağıdaki kodla tamamını alıyorum

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
Birisi yardımcı olabilir mi ? yaptığım proğramda tek bu sorunum kaldı . Veritabanını da eklemek isterim ama siteye eklenmiyor. yukarıdaki kod da nasıl bri değişiklik yapmam gerekiyor ki combobox ile filtrelediğim zaman listbox da o görünsün.
 
Olumlu oy 0 Negatif oyla
halily

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,908
Çözümler
258
Aldığı beğeni
1,868
Excel Versiyonu
Office 2019 TR
rar yada zipleyerek ekleyebilirsiniz
kriterler listbox1'in üstündeki metin ve açılır kutular mı olacak?
veriler listboxa butona basınca mı gelecek?
 
Olumlu oy 0 Negatif oyla
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
halily' Alıntı:
rar yada zipleyerek ekleyebilirsiniz
kriterler listbox1'in üstündeki metin ve açılır kutular mı olacak?
veriler listboxa butona basınca mı gelecek?
Genişletmek için tıkla...
Merhaba ,
rar ekledin yüklenmiyor.
gemba_liste userformunda listbox1 üzerindeki comboboz veya text box ile seçim yaptığımda lsitbox da filtreleme yapacak şuan onerifiltrele baslıklı kod anasayfa sheetinde filtreleme yapıyor amacım excell sayfalarını hiç kullanmamak . access veritabanı ve userform yani. hocam cevap hemen gelir mi yarın kullanacağımda dosya aktaracagım uzun sürer mi çözüm metodu ?
 
Olumlu oy 0 Negatif oyla
halily

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,908
Çözümler
258
Aldığı beğeni
1,868
Excel Versiyonu
Office 2019 TR
strSQL = "Select * from [gemba]" bu satira where kodunu ekleyerek yapabilirsiniz ama alan özellikleri bilinmeden koşulu doğru tanımlayamayız. Zip olarak denediniz mi
 
Olumlu oy 0 Negatif oyla
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
halily' Alıntı:
strSQL = "Select * from [gemba]" bu satira where kodunu ekleyerek yapabilirsiniz ama alan özellikleri bilinmeden koşulu doğru tanımlayamayız. Zip olarak denediniz mi
Genişletmek için tıkla...
Merhaba hoca mekledim db de excell de içerisinde
 

Ekli dosyalar

  • gemba.zip
    92 KB · Gösterim: 4
Olumlu oy 0 Negatif oyla
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
Ayrıca dediğin şekidle aşağıdaki gibi oluşturduğum da Verdiği hata : object doesnt support this property or methot


Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 0 Negatif oyla
halily

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,908
Çözümler
258
Aldığı beğeni
1,868
Excel Versiyonu
Office 2019 TR
Filtreleme tek alana gore mi yapilacak ?
ayrıca açılır kutu dışındakilere kısmi eşleşmeyi gösterecek mi?
diyelim ki işemrine, as yazarsak dasd de gösterecek mi?
 
Olumlu oy 0 Negatif oyla
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
halily' Alıntı:
Filtreleme tek alana gore mi yapilacak ?
ayrıca açılır kutu dışındakilere kısmi eşleşmeyi gösterecek mi?
diyelim ki işemrine, as yazarsak dasd de gösterecek mi?
Genişletmek için tıkla...
Hocam birden fazla alana göre olacak işemri,personel,hatadurumu gibi birden fazla olacak .

textbox için arama da dediğin gibi eşleşmeyi göstermesi daha iyi olabilir gibi yani 521 yazınca 521ay de çıksın 521az de bu örnekleri varsayım olarak verdim.
 
Olumlu oy 0 Negatif oyla
halily

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,908
Çözümler
258
Aldığı beğeni
1,868
Excel Versiyonu
Office 2019 TR
aşağıdaki kodu dener misiniz?
yalnız açılır kutularınızda hata olabilir
1673807028167.png
gördüğünüz gibi tablonuzdaki değerle açılır kutu değerleri farklı
formdaki hangi alanın tablodaki hangi alana denk geldiğini bilemediğim için o kısmı kafama göre yaptım siz kendinize göre düzenlersiniz
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Son düzenleme:
Olumlu oy 1 Negatif oyla
Çözüm
ahmetkostek

ahmetkostek

Yeni Üye
Kullanıcı Bilgileri
Katılım
4 Ara 2022
Mesajlar
64
Çözümler
1
Aldığı beğeni
15
Excel Versiyonu
Office 2013 EN
Konuyu Başlatan
halily' Alıntı:
aşağıdaki kodu dener misiniz?
yalnız açılır kutularınızda hata olabilir
Ekli dosyayı görüntüle 14851
gördüğünüz gibi tablonuzdaki değerle açılır kutu değerleri farklı
formdaki hangi alanın tablodaki hangi alana denk geldiğini bilemediğim için o kısmı kafama göre yaptım siz kendinize göre düzenlersiniz
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
Genişletmek için tıkla...
Merhaba ,

Hocam denedim. ancak 2 sorun var ekteki resimde göründüğü gibi birinci combobox a 2 harf yazıyorum 2. comboboxdan bir seçim yapınca 2. de seçilenleri getiriyor. Yani comboboxlar birbirilye bağlantılı olabilir mi ?

ikinci durum ise combobox veya textbox da listede olmayan bir seçim yaptığımda liste görünmeye devam ediyor. silinmiyor yani .
 

Ekli dosyalar

  • hata.JPG
    hata.JPG
    38.5 KB · Gösterim: 2
Olumlu oy 0 Negatif oyla
halily

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,908
Çözümler
258
Aldığı beğeni
1,868
Excel Versiyonu
Office 2019 TR
Refaz hocamın kullandığı gibi ListBox1.Clear kodu eklenebilir
 
Olumlu oy 0 Negatif oyla
halily

halily

Destek Ekibi
Kullanıcı Bilgileri
Katılım
29 Ağu 2021
Mesajlar
1,908
Çözümler
258
Aldığı beğeni
1,868
Excel Versiyonu
Office 2019 TR
Metin kutularının değiştiğinde yordamından çağrılabilir
Yalniz bu durumda Me.isemri yerine sonuna .text eklenmeli
Yani Me.isemri.text yazılmalı, diğer açılır ve metin kutuları için de yapılmalı
Ama açıkçası her harften sonra çalıştırmak sistemi kasabilir tavsiye etmem
 
Olumlu oy 0 Negatif oyla
Refaz

Refaz

Destek Ekibi
Kullanıcı Bilgileri
Katılım
11 Ağu 2021
Mesajlar
4,168
Çözümler
496
Aldığı beğeni
3,908
Excel Versiyonu
Office 2021 TR
iþemri_mhf] Like '" & Me.isemri.Text & "'"
Yada yukardaki gibi sadece Like olsun aratırken %A% olarak aratın.
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

Konuyu okuyanlar

Toplam: 2 (Kullanıcı: 0, Ziyaretçi: 2)
Üst