listbox arama-tıklatma sorunu

[sbugraa]

Evrak Takip Sistemine basılınca açılan userformda listboxa çift tıkladığımda textboxlarda ve comboboxlarda veriler görünüyor. ancak arama yaptığımda listboxta çıkan veri üzerine çift tıkladığımda alakasız şeyler geliyor. yardım ederseniz sevinirim.

 

[Ömer]

Merhaba,


Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)

Kodlarının altında,

ComboBox1.Text = Cells(ActiveCell.Row, "C")

Bu şekilde değilde, kurguyu aşağıdaki gibi yazarak kodları değiştirin.

ComboBox1.Text = ListBox1.List(ListBox1.ListIndex, 1)

Burada;

ListBox1.ListIndex "tıklanan bölgenin satır indisidir."

1 ise listboxdaki sütun indisidir. Sütun sırası 0 dan başlayarak ilerler, yani evrak türü sütun indisi 0, personelin sütun indisi 1 dir. Bu şekilde ilerler.

DblClick kodlarını bu şekilde düzenlerseniz istediğniz olacaktır.

 

[sbugraa]

çok teşekkür ediyorum çok güzel oldu.
birde az önce belirtmeyi unutmuşum düzelt butonum çalışmıyorum düzeltme işlemini gerçekleştirmiyor bakabilirmisiniz.

 

[sbugraa]

çok teşekkür ediyorum. çok güzel olmuş
birde az önce belirtmeyi unutmuşum düzelt butonu çalışmıyor ilgilenirseniz sevinirim.

 

[Ömer]

Eğer düzeltme, silme, listeleme hepsi bi arada yapacaksanız size tavsiyem verileri C sütunundan itibaren değilde B sütunundan itibaren listeleyin bu şekilde sıra numarasını listeye aldığını B sütununda alıp istediğiniz işlemi en pratik şekilde yapabilirsiniz.

Eğer B sütununun listede gözükmesini istemiyorsanız bu sütunun genişlikiğini 0 yaparak gizleyebilirsiniz.