Comboboxta seçilen veriye göre başka hücreye değer yazd

[falcon bsd]

Arkadaşlar soracağım sorunun cevabı muhtemelen forumda bi yerde vardır ama aramalarıma rağmen bulamadım.

Yapmak istediğimi kısaca özetleyecek olursam şöyle bişey.
İki tane hücre var biri ürün diğeri fiyatı.Ürün bölümünde Combobox var ben bu comboboxtan bi ürün seçtiğim zaman fiyatının hemen yanına yazmasını istiyorum.
İkinci bişeyde her hücreye ayrı bi combobox yapmak istemiyorum.Aynı işlemi yani fiyatın otomatik yazma işlemini doğrulama işlemi ilede yapabilir miyim?
Kolay bişey gibi ama bilmeyince olmuyo işte.
Yardımcı olursanız sevinirim.

 

[Levent Menteşoğlu]

Ekteki örneği inceleyin.

Combobaxa aşağıdaki kod yazılmıştır.

[vb:1:e114eefab1]Private Sub ComboBox1_Click()
[b2] = Cells([g2:g65536].Find(ComboBox1.Value).Row, 8).Value
End Sub
[/vb:1:e114eefab1]

Doğrulama ile yapılanda ise DÜÞEYARA fonksiyonu kullanabilkirsiniz.

=DÜÞEYARA(A16;G2:H65536;2;0) (B16 hücresine yazılacaktır.)

 

[gdemir]

sayın falcon bsd,
ilk ıstedıgınızı karsılaya bılırım ama ikinci ıstegınız benı asıyor
kusura bakmayın

 

[Levent Menteşoğlu]

ilk ıstedıgınızı karsılaya bılırım ama ikinci ıstegınız benı asıyor

Sn gdemir

Birincisini yapabiliyorsanız,ikincisi çok daha kolay bence

 

[gdemir]

efet yaptıgınız ornekte gordum ben kod kulanmadan yapmıstım
ama sız gene engın bılggınızı kulanmısınız
ve arkadasın ne ıstedıgını tam olarak alamamısım

 

[falcon bsd]

leventm yardımların için çok teşekkürler.
Yaptığın değişiklikler çok işime yaradı.