Çözüldü listbox seçili satırı silme

[erkan_64]

cevaplar için şimdiden tesekkür ederim excel vba yeniyim bir kaç eğitim videosu izleyerek birşeyler yapmayca calıstım ama bir noktada takıldım
depo /malzeme girişi/ toner girişini yaptık
takipler/tonertakip/ menüsünden depodaki toneri çift tıkla seçtik sonra forma aktardıktan sonra depodan seçilen toneri nasıl silebilirim
yani seçilen toner depodan silinmesini istiyorum

dosya:

Bu bağlantı ziyaretçiler için gizlenmiştir. Görmek için lütfen giriş yapın veya üye olun.

 

[kanakan52]

Dosyanız virüs korumaya takıldı. İçinde ne var bilmiyorum ama aşağıdaki kod bloğu işinize yarayabilir.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[erkan_64]

Pc yanımda olmadığı için ekran gorüntüsüyle anlatayım hocam listboxa çift tıklayınca verileri soldaki texboxlara cekecegim bunda sıkıntı yok daha sonra verileri aktardıktan sonra listbox dan ve listboxa veri cektiğim sayfadan verileri nasıl silebilirim

 

[kanakan52]

Verdiğim kod ezelden siler. Sadece kendinize uyarlayın. Ardından listboxa yeniden veri alın.

 

[erkan_64]

Vba da yeni sayılırım hocam kusura bakmayın.. Uyarlama kısmına kafa basmadı lixtboxum adı lsegbislistele sayfamın adı segbis, txboxların adı tid, t mikser, cbirim... Bu texler için tektekmi yazmam lazım

 

[kanakan52]

Hayır, id alanına göre silme yapacaksınız, excel de Id hangi sütunda.
Sheets("segbis").Range("A:A").Find(what:=textbox1.text

 

[erkan_64]

Anladım hocam pc acınca hemen deneyecegim çok teseklür ederim yardımınız için

 

[kanakan52]

Anladım hocam pc acınca hemen deneyecegim çok teseklür ederim yardımınız için

sayfa adı: segbis
ID sütunu: A
userform üzerindeki ID alanı=textbox1 olduğunu varsayarak aşağıdaki kod çalışmaktadır. Sorun olursa yardımcı olurum.

Sheets("segbis").Range("A:A").Find(what:=textbox1.text, lookat:=xlWhole).EntireRow.Delete

 

[erkan_64]

denedim şimdi hocam kod tam istediğim gibi çalışıyor çok tesekkür ederim

 

[Refaz]

Bir butona alttaki kodu eklerseniz Listboxa göre daha iyi olur bence kanakan52 hocamızın kodunu kullandım.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[kanakan52]

Bir butona alttaki kodu eklerseniz Listboxa göre daha iyi olur bence kanakan52 hocamızın kodunu kullandım.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Refaz üstadım selamlar.. Katkınız için teşekkür edip saygılarımı sunuyorum.

 

[kanakan52]

denedim şimdi hocam kod tam istediğim gibi çalışıyor çok tesekkür ederim

Rica ederim,sağlıcakla kalın.