• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

3 combobox süzmede bir sorun

  • Konbuyu başlatan Konbuyu başlatan badtr
  • Başlangıç tarihi Başlangıç tarihi
Katılım
8 Ocak 2011
Mesajlar
25
Excel Vers. ve Dili
2010 TR
selam arkadaşlar,

ekteki tabloda 3 combobox var birbirleri ile ilişkili ve excel sayfasındaki verilerde süzme işlemi yapıyorlar. 3 comboboxtada ürünler seçildiğinde sorun yok doğru çalışıyor ama birinde "Tümü" seçili olduğunda o comboboxa ait tüm ürünleri getirmesi gerekiyor..

şimdiden yardımcı olacak arkadaşlara teşekkür ederim.
 

Ekli dosyalar

selam arkadaşlar,

ekteki tabloda 3 combobox var birbirleri ile ilişkili ve excel sayfasındaki verilerde süzme işlemi yapıyorlar. 3 comboboxtada ürünler seçildiğinde sorun yok doğru çalışıyor ama birinde "Tümü" seçili olduğunda o comboboxa ait tüm ürünleri getirmesi gerekiyor..

şimdiden yardımcı olacak arkadaşlara teşekkür ederim.

nasıl yapmak istedin bilmiyorum çünkü eğer combobox1 tümü ise combobox2 ve combobox3 de tümü olmak zorunda dolayısıyla süzmenin anlamı olmuyor. eğer combobox2 tümü ise combobox3 de tümü olmak zorunda oluyor. bu yaptıkların doğru ise

ekteki dosaya sana yardımcı olur. yok eğer öyle olması gerekmiyor da normal bir süzme gerekiyorsa farklı olması gerekiyor.
 

Ekli dosyalar

Son düzenleme:
amaç şu

grup 1 - a seçili
grup 2 - tümü seçili
grup 3 - tümü seçili

görüntü şöyle olmalı

grup1 grup2 grup3

a------a1----a1-01
a------a1----a1-02
a------a2----a2-01
a------a2----a2-08

veya

grup 1 - a seçili
grup 2 - a1 seçili
grup 3 - tümü seçili

görüntü şöyle olmalı

grup1 grup2 grup3

a------a1----a1-01
a------a1----a1-02
 
amaç şu

grup 1 - a seçili
grup 2 - tümü seçili
grup 3 - tümü seçili

görüntü şöyle olmalı

grup1 grup2 grup3

a------a1----a1-01
a------a1----a1-02
a------a2----a2-01
a------a2----a2-08

veya

grup 1 - a seçili
grup 2 - a1 seçili
grup 3 - tümü seçili

görüntü şöyle olmalı

grup1 grup2 grup3

a------a1----a1-01
a------a1----a1-02


kodları yazarken ben de aynısını düşünmüştüm

şu kodu kopyala yapıştır ile yazdığım için 2 yi değiştirip 3 yapmayı unutmuşum. düzelttim. ilk mesajımdan tekrar alabilirsin.

ActiveSheet.Range("$A$5:$D$18").AutoFilter Field:=2
yerine
ActiveSheet.Range("$A$5:$D$18").AutoFilter Field:=3
olacaktı
 
eline sağlık arkadaşım çok teşekkür ediyorum, CommandButton1 de senin yazdığın kodları tamamını kopyalayıp 3 combobox un altına yapıştırdım ve verileri süz butununu kaldırdım böylece her combobox u değiştirdiğimde süzme işlemi gerçekleşiyor..

eline sağlık
 
Geri
Üst