• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Listviev çift tıklama ile sayfadaki satırı silme

  • Konuyu Başlatan Konuyu Başlatan Bluekaya
  • Başlangıç tarihi Başlangıç tarihi
  • Görüntülenme 937
Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Bluekaya

Bluekaya

Yeni Üye
Katılım
23 Mar 2021
Mesajlar
225
Çözümler
3
Aldığı beğeni
31
Excel V
Office 2016 TR
Konu Sahibi
Merhabalar userform1 deki listview e çift tıklayınca gereken diğer işlemleri sağladıktan sonra satışdetay sayfasından "J" Hücresindeki id yi bulup o hücreye ait satırı silmesini istiyorum fakat yapmıyor kodları attaki gibidir teşekkür ederim.


HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çözüm
Refaz
Set bul = Sheets("Satisdetay").Range("J:J").Find(ListView1.ListItems(i).SubItems(9), , , 1)
Yukardaki kod ile zaten Satır No aranıyor.

Sadece ilgiili yere alttaki kod eklemek yeterli örneğin If Not bul Is Nothing Then bunun altına.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Tarihe göre sırala Oylara göre sırala
Merhaba,

txt_id isimli bir textbox oluşturun. Listwiev çift tıklayınca tıklanan satırın sıra numarasını txt_id textboxına aldırın.
Daha sonra koşul tamamlanırsa aşağıdaki gibi satırı sildirebilirsiniz.

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
himmgarip' Alıntı:
Merhaba,

txt_id isimli bir textbox oluşturun. Listwiev çift tıklayınca tıklanan satırın sıra numarasını txt_id textboxına aldırın.
Daha sonra koşul tamamlanırsa aşağıdaki gibi satırı sildirebilirsiniz.

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
maalesef tüm kodlarıma hata verdirdi bana tüm end ifleri sildirdi en sonunda da komple end sub a kadar hata verdi
 
Olumlu oy 0 Negatif oyla
Benim yazdiklarimda sizin koşul kodlariniza hata verdirecek bir yer yok ki??? Sadece kodu kendinize göre uyarlayacaksiniz.
 
Olumlu oy 0 Negatif oyla
Set bul = Sheets("Satisdetay").Range("J:J").Find(ListView1.ListItems(i).SubItems(9), , , 1)
Yukardaki kod ile zaten Satır No aranıyor.

Sadece ilgiili yere alttaki kod eklemek yeterli örneğin If Not bul Is Nothing Then bunun altına.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 1 Negatif oyla
Çözüm
Konu Sahibi
Refaz' Alıntı:
Set bul = Sheets("Satisdetay").Range("J:J").Find(ListView1.ListItems(i).SubItems(9), , , 1)
Yukardaki kod ile zaten Satır No aranıyor.

Sadece ilgiili yere alttaki kod eklemek yeterli örneğin If Not bul Is Nothing Then bunun altına.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
tamamdır hocam oldu teşekkür ederim
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
Refaz' Alıntı:
Set bul = Sheets("Satisdetay").Range("J:J").Find(ListView1.ListItems(i).SubItems(9), , , 1)
Yukardaki kod ile zaten Satır No aranıyor.

Sadece ilgiili yere alttaki kod eklemek yeterli örneğin If Not bul Is Nothing Then bunun altına.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Genişletmek için tıkla...
diğer konu kapatılmış hocam eksiklikleri gidermek için yeni klonumu açayım ?
 
Olumlu oy 0 Negatif oyla
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst