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

[ahmetkostek]

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 ?

 

[ahmetkostek]

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

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[ahmetkostek]

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.

 

[ahmetkostek]

halily Refaz

 

[halily]

rar yada zipleyerek ekleyebilirsiniz
kriterler listbox1'in üstündeki metin ve açılır kutular mı olacak?
veriler listboxa butona basınca mı gelecek?

 

[ahmetkostek]

rar yada zipleyerek ekleyebilirsiniz
kriterler listbox1'in üstündeki metin ve açılır kutular mı olacak?
veriler listboxa butona basınca mı gelecek?

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 ?

 

[halily]

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

 

[ahmetkostek]

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

Merhaba hoca mekledim db de excell de içerisinde

 

[ahmetkostek]

Ayrıca dediğin şekidle aşağıdaki gibi oluşturduğum da Verdiği hata : object doesnt support this property or methot


HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[halily]

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?

 

[ahmetkostek]

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?

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.

 

[halily]

aşağıdaki kodu dener misiniz?
yalnız açılır kutularınızda hata olabilir

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
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[Refaz]

Merhaba.Koddaki Tr karakterleri düzeltin çalışmazsa.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[ahmetkostek]

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
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

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 .

 

[halily]

Refaz hocamın kullandığı gibi ListBox1.Clear kodu eklenebilir

 

[ahmetkostek]

Refaz hocamın kullandığı gibi ListBox1.Clear kodu eklenebilir

Hocam oda tamam son olarak ASDAS yazıyor A yazınca ilgili sonuclar çıkması için hangi alanda düzeltme lazım cunkü asdas Aratmak için asd yazıyorum buluyor

 

[halily]

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

 

[Refaz]

[iþemri_mhf] = '" & Me.isemri.Text & "'"

Mesela yukardaki yeri alttaki gibi yapın diğerleride.Like ve % bunu ekledim sma mobilden ayarladım deneyemedim.

iþemri_mhf] Like '%" & Me.isemri.Text & "%'"

 

[Refaz]

iþemri_mhf] Like '" & Me.isemri.Text & "'"
Yada yukardaki gibi sadece Like olsun aratırken %A% olarak aratın.

 

[ahmetkostek]

Refaz ve halily hocam ellerinize sağlık harika oldu. sizleri uğraştırdım çok teşekkür ederim.