Çözüldü ListBoxta seçilen verilerin bulunduğu satırları gizleme

[Feylosof]

İyi günler diliyorum.

ListBox1 de hangi isim veya isimleri seçersem "B" sütununda bulunan aynı isimlerin satırlarını gizlemek istiyorum. Yardımınız için şimdiden teşekkür ederim.

 

[oilgun]

Dosyanızı yada bir örneğini ekleyebilir misiniz?

 

[Alicimri]

İsimlerin A sütununda olmasına göre:
HTML:

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

Not tablette yazıyorum deneyemedim. Genel mantığı bu olsa gerek.

 

[mozuer]

Örneğinize ekleyip dener misiniz...
HTML:

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

 

[Refaz]

İsimlerin A sütununda olmasına göre:
HTML:

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

Not tablette yazıyorum deneyemedim. Genel mantığı bu olsa gerek.

Satıir gibiler yanlış.Rors yanlış abey

 

[Feylosof]

İlgi gösteren tüm ustalara teşekkür ediyorum.
Bir demo dosya ekliyorum. sayın Alicimri ve sayın mozuer ustanın kodlarından sonuç alamadım.

 

[Feylosof]

Şu kod sonuca çok yakın ama bunda da kaç isim seçersem seçeyim en fazla bir satır gizliyor.
HTML:

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

 

[halily]

yalnız 3 isim de aynı siz diyelim 2. deevedfe'yi seçtiniz ne olacak? deevedfe'yi içeren 3 satır da gizlenecek mi yoksa sadece A sütununa göre 2 olan tek mi gizlenecek?

 

[Feylosof]

Halil bey merhaba
İsimler farklı olacak. Ben farklı denemeler yaparken o şekilde kalmış. Kusura bakmayın.

 

[halily]

varsayalım 20 isim var ve tesadüfen 3. ve 13. isimler aynı varsayalım halil siz 13. ismi seçtiniz bu durumda aynı olan 3. isim de gizlenecek mi? önemli olan o

 

[halily]

aşağıdaki kodu dener misiniz veriler 6. satırdan başladığı için i + 6 yazılmıştır
Dim s1 As Worksheet, Sutun As Integer

Set s1 = Sheets("AS")
For i = 0 To Me.ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then s1.Rows(i + 6).EntireRow.Hidden = True
Next i
End Sub

 

[halily]

kodu düzelttim
HTML:

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

 

[halily]

aşağıdaki gibi de olabilir ama çok fazla isim seçildiğinde range() içindeki metin ifadesini sınırı aşıldığından hata verebilir
yanılmıyorsam bir kere öyle olmuştu bende ama emin değilim
HTML:

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

 

[Refaz]

range() içindeki metin ifadesini sınırı aşıldığından hata verebilir
yanılmıyorsam bir kere öyle olmuştu bende ama emin değilim

Kesin hata verir sınırda 256 biliyorum.
Bir adres ortalama 5 saysak virgül sayılmıyorsa 50 kere seçim yapılır heralde.

 

[Feylosof]

halily üstadım çok teşekkür ederim. Bu kod tam oldu. Elinize zihninize sağlık. Varolun.