مشکل در لیست باکس

[majidartoor]

با سلام به همه ی دوستان
من یه لیست باکس دارم که مرجعش یه جدوله.
این جدول بنا به تغییرات ممکنه بعضی ردیف هاش هیدن بشه.
حالا سوال من اینه که آیا میشه تو لیست باکس ردیف هایی که هیدن شدن نشون داده نشه؟
با تشکر.

[Javid Mokhtari]

با سلام به همه ی دوستان
من یه لیست باکس دارم که مرجعش یه جدوله.
این جدول بنا به تغییرات ممکنه بعضی ردیف هاش هیدن بشه.
حالا سوال من اینه که آیا میشه تو لیست باکس ردیف هایی که هیدن شدن نشون داده نشه؟
با تشکر.

با سلام.
خب کافیه برای ردیف های خالی یک شرط قرار بدین:

Sheet1.ListBox1.Clear
For i = 1 To 10
    If Rows(i).EntireRow.Hidden = False Then
        Sheet1.ListBox1.AddItem Cells(i, 1)
    End If
Next 

البته کد بالا یک مثال است که قسمت مهمش همون دستور if هست که میتونه بسته به نیازتون در هر جایی استفاده بشه.