ListBox Hücre Değerine Göre Listeleme

  • Konuyu başlatan Konuyu başlatan esnaf88
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

esnaf88

Kullanıcı
Katılım
5 Tem 2024
Mesajlar
13
Excel Versiyonu
Excel 365
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhaba,
Kullandığım dosyada, aşağıdaki kodlarla Data sayfasındaki bilgilerin hepsini Listbox'ta listeliyorum. Ancak, bu verilerin hepsini değil de, "M" sütunundaki hücrelerdeki metinsel verilerin bir tanesine göre (mesela sadece "Masa" olanlara göre) getirebilmek için nasıl bir değişiklik yapmalıyım?
Yardımlarınız için şimdiden teşekkür ederim.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(16 satır)
 
İstenen Satır Sayısında Paragraf Oluşturma
Tek Sütundaki Değerleri Ayrı Sütunlara Yazdırma
Tek Sütundaki Değerleri Ayrı Sütunlara Yazdırma
Tarihe göre sırala Oylamaya göre sırala
İlginize Teşekkür ederim.
Kodları denedim:
1-Sayfadaki ilk değeri bulup getiriyor. Ve "J" sütununa kadar olan ilk 10 sütundaki bilgileri getiriyor. Diğerlerini getirmiyor.
2-Makro hatası veriyor. Kodun:

.List(.ListCount - 1, satir - 1) = Data.Cells(i, satir).Value

bölümünde ".ListCount" değerini "1" olarak, "Data.Cells(i, satir)" değerini "Satir=11" olarak gösteriyor.

Ekran.webp


Ekran2.webp
 
Oyla 0 Olumsuz oyla
Dosyanız olmadan afaki olarak ancak bu kadar oluyor.
Verdiğiniz kodlara göre ilave bir revize ekliyorum.
Bu da olmazsa, dosyayı görmekten başka seçeneğim kalmıyor.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(23 satır)
 
Oyla 0 Olumsuz oyla
Kodlardaki:
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)
kısmını bulup, aşağıdaki kodlar ile değiştirmeyi dener misiniz?
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(3 satır)
 
Oyla 0 Olumsuz oyla
Kodları değiştirip denedim. Hata vermedi. Elinize sağlık.
Ancak Sütun başlıkları Listboxa gelmiyor. ve N sütununa değil J sütununa kadar olan verileri alıyor.
Sütun başlıkları ve N sütununa kadar olan verileri de getirtmek için nasıl bir değişiklik gerekir acaba.
Yardımlarınız için teşekkürler.
 
Oyla 0 Olumsuz oyla
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt