Birbirine bağlı comboboxlar

[mustafakoksu]

Arkadaslar merhaba formda 8 tane combobox var hepsını bırbırıne baglamaya calıstım fakat 1 özellık oncesını baglayamıyorum
ornegın:
combobox1 degerlerı :özellık 1-1,özellık 1-2
combobox2 degerlerı :eğer özellık 1-1 secılırse sadece ıthal gelmelı
combobox3 degerlerı :eğer ıthal secılırse sadece mesut gelmelı cunku özellık 1-1 ıthal olabılır ıthalde mesut olabılır bende dıger alanlarda gelıyor velı gıbı

urun agac yapısını nasıl yapabılırım.

ıyı calısmalar.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki linkleri incelermisiniz.

http://www.excel.web.tr/showthread.php?t=71016
http://www.excel.web.tr/showthread.php?t=72360

 

[mustafakoksu]

cok sagol deniyorum

tesekkurler

 

[fatiherol06]

Birbirini çeviren combobox lar

tesekkurler

Merhaba
Arkadaşlar iki adet combobox var 1. ye 34 yazınca 2. istanbul yazsın
2.ye istanbul yazınca 1.ye 34 yazsın mantığı bu yani birbirini çevirsin istiyorum
Bazen müşteriler ürün kodunu yazıyor, bazen ürün ismini yazıyor
bunları yazdığımda ürün fiyatları stokları atsın istiyorum.
bana yardımcı olabilirmisiniz Vba kodlarını bir türlü yapamadım

 

[fatiherol06]

Örnek Dosyam Ektedir

Örnek dosya ektedir yardımlarınızı bekliyorum

 

[fatiherol06]

Merhaba
Arkadaşlar iki adet combobox var 1. ye 34 yazınca 2. istanbul yazsın
2.ye istanbul yazınca 1.ye 34 yazsın mantığı bu yani birbirini çevirsin istiyorum
Bazen müşteriler ürün kodunu yazıyor, bazen ürün ismini yazıyor
bunları yazdığımda ürün fiyatları stokları atsın istiyorum.
bana yardımcı olabilirmisiniz Vba kodlarını bir türlü yapamadım

 

[Erdem Akdemir]

Merhaba,

Sizin için ufak bir örnek hazırladım, inceleyebilirsiniz.

Private Sub ComboBox1_Change()
a = ""
b = ""
a = ComboBox1.Text
b = WorksheetFunction.Match(a, Range("a:a"), 0)
ComboBox2.Value = Range("b" & b)

End Sub

Private Sub ComboBox2_Change()

a = ""
b = ""
a = CLng(ComboBox2.Text)
b = WorksheetFunction.Match(a, Range("b:b"), 0)
ComboBox2 = Format(ComboBox2, "0#")
End Sub

Private Sub UserForm_Initialize()

ComboBox1.RowSource = "sayfa1!a1:a3"
ComboBox2.RowSource = "sayfa1!b1:b3"

End Sub

 

[fatiherol06]

Teşekkür ederim öncelikle
userform da istanbul deyince 34 atıyor fakat 2. comboya 20 yazınca denizli atmıyor birde bunları userform değilde excele eklenen combobox ile yapabilirmiyiz ben veri doğrulama ile yapmaya baya uğraştım fakat beceremedim

 

[Korhan Ayhan]

Dosyanızda isim tanımlamalarını düzenledim.

Ekli dosyayı inceleyiniz.

 

[fatiherol06]

Çok Teşekkür ederim
bayadır uğraşıyordum, combobox içindeki verilere göre vba kodlarıyla
fiyat ve stok bilgisi alabilirmiyiz peki mesela ürün kodu veya ismini seçtğimizde
hücrelere fiyat stok bilgisi gelmesi gibi

 

[Korhan Ayhan]

Satır bazlı işlem yapacaksanız combobox yerine userform kullanmanızı öneririm. Stok kodu ya da adı bölümüne çift tıklayarak formu açıp ilgili stok kartını seçip hücrelere aktarabilirsiniz.

 

[fatiherol06]

Evet korhan bey dediğiniz doğru fakat Excel de yeni olduğum için Vba kodlarını
bilmiyorum kendimi geliştirmeye çalışıyorum dediğiniz mantık Go Plus programındaki sipariş formunda var bende tam olarak böyle bir şey yapmak istiyorum.Örnekteki combobox ta Örneğin milli kahramanlar yazıyorum Milli yazınca hepsini siliyor arama yapmıyor çoğunda bunu yapıyor buna nasıl bir çözüm bulabiliriz.