• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Listviewde seçilen birden çok satırı aktarmak.

Katılım
5 Aralık 2007
Mesajlar
635
Excel Vers. ve Dili
Office 2007
Merhaba,
Ekteki çalışmamda, stok miktarı belirli bir sayının altına düşen stokları listviewe alıyor ve listelenen stoklardan seçtiğim ürünü listview üzerinde sağ klik ile "siparişver" kodunu çalıştırarak tek tek sipariş sayfasına gönderiyorum. Yapmak istediğim; listview üzerinden birden çok satır seçip "siparişver" kodunu seçilen satır sayısı kadar çalıştırarak, belirlenen ürünleri yine sağ klik ile tek seferde sipariş sayfasına göndermek.
İlgilenen arkadaşlara teşekkür ederim.
 

Ekli dosyalar

Son düzenleme:
İlgili kodlarınızı aşağıdaki gibi bir döngünün arasında tanımlayabilirsiniz.

Kod:
For a = 1 To ListView1.ListItems.Count
If ListView1.ListItems(a).Selected = True Then
.
.Kodlarınız
.
End If
Next
 
Merhaba Sayın Levent Menteşoğlu,
Önerdiğiniz kodları çalışmama uyguladım. Döngü sonucunda seçilen satırlar değil, sadece seçilen son satır döngü sayısı kadar aktarılıyor. Sağ klik sırasında tıklanan satır esas alınıyor olabilir düşüncesiyle kodu bir butona atadım ama sonuç yine aynı. Döngünün uygulandığı dosya ektedir.
İlginize teşekkür ederim.
 

Ekli dosyalar

Döngü içinde listitemleride döngüye bağlamanız gerekir. Örneğin;

ListView1.SelectedItem yerine ListView1.ListItems(a)

ListView1.SelectedItem.SubItems(1) yerine ListView1.ListItems(a).SubItems(1)
 
Merhaba Levent bey,
Gösterdiğiniz değişiklikleri yaptım .İşlem olması gerektiği gibi gerçekleşiyor. İlginize ve yardımlarınıza çok teşekkür ederim. İyi ki varsınız.. Esen kalın..
 
Geri
Üst