پرسش if در vba

[mahdie-ard]

با سلام و احترام
اگر زحمتی نیست راهنمایی بفرمایید.
لیستی دارم که در انتهای آن از true و false استفاده شده است. در بالای لیست یک عدد چک باکس هستش. اگر بخواهم زمانی که چک باکس true هست لیست فقط true ها رو نشون بده و زمانی که false هستش همه رو نشون بده . چه کار باید بکنم؟ البته به کمک یک عدد button

[Ali Parsaei]

سلام،
اينکه در آخر گفته ايد به کمک يک عدد button را متوجه نمي شوم!!! چون خود چک باکس کافي است ديگه button براي چي؟
به هر حال اگر فرض کنيم ستون آخر جدول شما که در آن false و true ها را نوشته ايد ستون E باشد و داده ها صد رديف باشد کد زير را بايد براي چک باکس بنويسيد البته ميشه کد ديگري هم بر حسب فيلتر سرستون E جدول نوشت:

Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Dim C As Range
For Each C In Range("E1:E100")
If C = False Then
Rows(C.Row).Hidden = True
End If
Next
Else
For Each C In Range("E1:E100")
If C = False Then
Rows(C.Row).Hidden = False
End If
Next
End If
End Sub