Userform kayıt hatası

[Rıdvan01]

Selam arkadaşlar
vba konusunda fazla bilgim olmadığından yardıma ihtiyacım var.

userform üzerinde boxlara veri girerek sayfaya kayıt yapıyorum fakat
kayıt yaparken listbox seçili ise boxlardaki verileri kaydetmiyor listboxtaki seçili veriyi aynen kaydediyor

mükerrer kayıt kodlarını eklediğimde zaten aynı kayıttan mevcut diyerek kayıt yapmıyor

yani kaydet dediğimde listboxsun seçili olmaması gerek
yardımınız için şimdiden teşekkür ederim

 

[Rıdvan01]

ustalar bi baksanız lütfen
ben çözemedim

 

[Rıdvan01]

hala bi yanıt yokmu?

 

[ridvan2111]

arkadaşlar yaklaşık 15 gün oldu hala bi cevap yok..!

sorunun daha iyi anlaşılması açısından kayıt yapmayı deneyin
(kayıt yopmadan listbox bir satır seçili olsun)
göreceksiniz sizin girdiğiniz veriler değilde listbox taki seçili verileri kaydetmiş

 

[Skorpiyon]

Sayın ridvan2111,

Listbox nesnenizin "Click" olayına kod yazmışsınız. Bu da listbox'a tıkladığınızda ilgili verilerin forma yerleşmesini sağlıyor. (Özellikle Sipariş No hanesine) Veriler yerleştikten sonra Kaydet butonuna bastığınızda formda bulunan veriyi kaydetmesi oldukça doğal. Çünkü kaydet kodlarınızda da form üzerinde Textbox1 (Yani Sipariş No) boş değilse kaydet demişsiniz.

Yapılacak şey ne ?

Listbox nesnenizin altında bulunan
" TextBox1 = Worksheets("SİPARİŞ GİRİŞİ").Range("C" & ListBox1.ListIndex + 2) "
kodunu silerseniz probleminiz çözülür. Yok eğer ben listbox'a tıkladığımda Sipariş No'da gelsin diyorsanız o zamanda kaydı engellemek için Kayıt butonunu pasif hale getirmeniz lazım ki butona basılamasın.

Eğer butonu pasif hale getirmek isterseniz, yapmanız gerekenler;
Listbox1'in kodlarının en altına
CommandButton1.Enabled = False 'yazın.

Butonun tekrar aktif hale gelmesini ise Temizle butonuna bağlayacağız.
Onun içinde Temizle butonu kodlarının en altına
CommandButton1.Enabled = True 'yazın.

Kolay gelsin.