View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Frank Kabel Frank Kabel is offline
external usenet poster
 
Posts: 3,885
Default 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.