Hatalı süz

[vuranoğlu]

Merhaba
Girilmiş olan verilerden aynı isimlerde süz hata veriyor.Aynı isimlerden yalnızca son kayıt geliyor.İlgilenen arkadaşlara teşekkürler.

 

[Orion1]

Ben böylemi gösterdim.
Dosyanız ektedir.
comboboxın changed olayınıda inceleyiniz.
listboxın kolon adetini 2 yaptım.

Private Sub ListBox1_Click()
If ListBox1.ListCount < 1 Then Exit Sub
Cells(ListBox1.Column(1), "C").Select
TextBox1 = ActiveCell.Offset(0, 0)
TextBox2 = ActiveCell.Offset(0, -1)
TextBox3 = ActiveCell.Offset(0, 1)
TextBox4 = ActiveCell.Offset(0, -2)
TextBox4.Enabled = False

End Sub

 

[vuranoğlu]

Sn :Evren Gizlen
İlginize ve uyarınıza teşekkür ederim.
Sayfada veri çoğaldığında dosyayı açma ve kapamada gecikmeler oluyor.
Formüllerimizde gene hatalı işlevmi yaptırıyoruz.

Teşekkür ederim.