Soru Listoboxta Seçilen Sayfadaki Satırları Gizle/Göster

[Hsn55]

Merhabalar;
Ekli dosyada veri girişi sayfasında F10:F40 hücre aralığına veri girdiğimde aynı veriler Harcırah, Olur ve Görevlendirme sayfalarında F10:F40 hücrelerinde bağlantısı var. Veri Girişi Sayfasında F10:F40 hücre aralığında boş olan hücrelerin satırları diğer sayfalarda Listbox1 den hangi sayfayı seçersem (Harcırah,Olur ,Görevlendirme) o sayfada F10:F40 hücreleri arasında veri olmayan satırlar gizlenebilir mi?. Not: Listbox1 de hangi sayfa seçili ise o sayfadaki veri olmayan satırlar gizlenecek.

Bilgi

Bilgi

dosyam.org

 

[Hsn55]

Arkadaşlar merhabalar,
Konuya yardımcı olabilir misiniz?

 

[AdemCan]

Merhaba, listbox tıklama kodları.

Private Sub ListBox1_Click()
Deger = ListBox1.Value
Sheets(Deger).Rows("10:40").EntireRow.Hidden = False
    For i = 10 To 40
        If Cells(i, 6) = "" Then Sheets(Deger).Rows(i).EntireRow.Hidden = True
    Next i
End Sub

 

[Hsn55]

Sayın AdemCan çok teşekkür ederim