Listboxda istenilen verileri alma

[kan-nas]

Merhaba,
Ekteki dosyada istediğim tarihleri hücreye girip AKTAr tuşuna basınca verileri getiriyor ama bir kere daha tıklarsan aynı veriyi eski verinin altına ekliyor. Ne kadar tıklarsam o kadar atıyor.

Nasıl düzeltebilirim.?
Yardımlarınız için.

 

[kan-nas]

Dosya ektedir.

 

[Husgvarna]

Merhaba,
Ekteki dosyada istediğim tarihleri hücreye girip AKTAr tuşuna basınca verileri getiriyor ama bir kere daha tıklarsan aynı veriyi eski verinin altına ekliyor. Ne kadar tıklarsam o kadar atıyor.

Nasıl düzeltebilirim.?
Yardımlarınız için.

Butondaki kodlarınıza listeyi temizleyen aşağıdaki kırmızı bölümü ekleyin.

Private Sub CommandButton1_Click()
[COLOR="Red"]ListBox1.Clear[/COLOR]
For i = 1 To Range("a65536").End(3).Row
'..........

 

[kan-nas]

Üstad çözüm basitmiş.

teşekkürler.