Çözüldü Listview de silme butonu hakkında

Admin' Alıntı:

Dosyanızı incelemedim ama, index numarası vs işlemi yapmadan buton aracılığıyla sildirme yapmak isterseniz, ListView click olayında, ilgili verinin olduğu satırı seçtirin.

ListView'de bu seçim sağlandıktan sonra, ActiveCell.EntireRow.Delete kodu işinizi görecektir.

Genişletmek için tıklayın ...

Admin' Alıntı:

ListBox'ta da olmaz. Bir hücrenin yer aldığı referansı göstermeden nesnenin kendisinden silme bekleyemezsiniz ki.
Verdiğiniz kodlarda zaten bu arama işlevi yapılmakta ve ilgili satır bulunduktan sonra silmek gerçekleşmekte.

Kod:

İçeriği görüntülemek için giriş yapmalısınız
(1 satır)

A:I aralığında verilerin olduğu bir tablodan ListView'e aktarım yapıldığını düşünün.
Üstteki kodda yer alan SubITems(8) değeri, ilgili satır numarasını vermektedir. Yani verilerin bittiği sütunun hemen bir sonraki alanının belirtilmesi.

Siz bu işlemi yaptırıp, ilk verdiğim kod ile silme yapabilirsiniz. Ya da kodu aşağıdaki gibi revize ederseniz, sayfadan seçim yaptıramamadan direk silme işlemide yaptırabilirsiniz.

Kod:

İçeriği görüntülemek için giriş yapmalısınız
(1 satır)

Yani işin özeti, bu iş mutlaka verinin doğru olarak bir şekilde bulunmasından geçer. Siz eğer birden fazla veriyi tek bir komutla silmek isterseniz, o zaman verdiğiniz koddaki gibi bir döngü yapmanız lazım.

Şu anda dosya indirmek ve uyarlamak için müsait değilim ama verdiğim yapıdan yola çıkabilirsiniz diye düşünüyorum.

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

Sayın @Cengizhan .

Textbox'u kullanarak ARAMA yapıldığında Listview içeriği filtreleniyor.
Bu durumda ilgili satırın, Excel sayfasındaki hangi satırdaki veri olduğu nasıl anlaşılacak.
ID/INDEX no gibi benzersizlik garantisini sağlayacak ve sayfa ile Listview satırı arasındaki ilişkiyi kuracak şey ne olacak o zaman ?

ARAMA işlemi yapmadan tüm liste Listview nesnesinde görünüyorken ve sıralama gibi işlem de yoksa mesele değil.
Ancak daha sonra bu tür durumlar oluştuğunda sorun yaşarsınız.

Listede benzersizlik garantisi varsa SORGU yapalmışsa da birşeyler yapılabilir.
Yani satırlardaki (bütün olarak) veriler TEKİL midir? Mükerrer satır olma ihtimali var mıdır?

Herneyse; sorgu uygulanmadan SİLME işlemi istiyorsanız aşağıdaki kodu kullanabilirsiniz.

VBA:

İçeriği görüntülemek için giriş yapmalısınız
(5 satır)

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

Sayın @Cengizhan .

Textbox'u kullanarak ARAMA yapıldığında Listview içeriği filtreleniyor.
Bu durumda ilgili satırın, Excel sayfasındaki hangi satırdaki veri olduğu nasıl anlaşılacak.
ID/INDEX no gibi benzersizlik garantisini sağlayacak ve sayfa ile Listview satırı arasındaki ilişkiyi kuracak şey ne olacak o zaman ?

ARAMA işlemi yapmadan tüm liste Listview nesnesinde görünüyorken ve sıralama gibi işlem de yoksa mesele değil.
Ancak daha sonra bu tür durumlar oluştuğunda sorun yaşarsınız.

Listede benzersizlik garantisi varsa SORGU yapalmışsa da birşeyler yapılabilir.
Yani satırlardaki (bütün olarak) veriler TEKİL midir? Mükerrer satır olma ihtimali var mıdır?

Herneyse; sorgu uygulanmadan SİLME işlemi istiyorsanız aşağıdaki kodu kullanabilirsiniz.

VBA:

İçeriği görüntülemek için giriş yapmalısınız
(7 satır)

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

Koda bir koşul eklemiştim.
Sayfayı yenileyerek kodu tekrar kontrol edin.

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

Yanlış anlamayın ama belgenize her baktığımda Personeller kelimesi gözüme çarpıp duruyor.
Personel sözcüğünin kendisi ÇOĞUL. o nedenle PERSONEL demek daha doğru olur.

Bu da benim huyum. İdare edersiniz artık.

.

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

Eyvallah, sağ olunuz.

Memnuniyetinizi;
-- çevrenizdeki Excel kullanıcılarını forumumuzdan haberdar edip, üye olmalarını salık vererek,
-- mümkün olduğunca sık ve uzun süreli çevrimiçi kalarak,
-- tüm sosyal medya kanallarında forumumuzdan bahisle link vererek
gösterirseniz daha da memnun oluruz.

.

Genişletmek için tıklayın ...

Ömer BARAN' Alıntı:

Bilgisayarda değilim. Uygun vakit bakarım.
Ayrıca If ve End if satırlarına da gerek olmayabilir.

Genişletmek için tıklayın ...