Hide Rows If Cell Value = False
Hi
try something like the following:
Sub hide_rows()
Dim RowNdx As Long
Dim LastRow As Long
LastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).row
For RowNdx = LastRow To 1 Step -1
If Cells(RowNdx, "A").Value = False Then
Rows(RowNdx).hidden = True
End If
Next RowNdx
End Sub
hides all 'False' rows in column A
--
Regards
Frank Kabel
Frankfurt, Germany
TOMB wrote:
Windows 2000; Excel 2000
I am using several checkbox controls (format control and
cell link) to toggle a cell's value between 'True'
and 'False'.
I would like to hide or unhide rows based on these cells.
Any suggestions besides using AutoFilter?
Thanks in advance.
|