Macro for hiding rows
Luke,
try this VBA code: (this code consider the name of the sheet as Sheet1 and
you want to hide the rows that the cell in the column A is empty)
Sub HideEmptyRows()
With Worksheets("Sheet1")
lastrow = .Range("A65536").End(xlUp).Row
For i = 1 To lastrow
If .Range("A" & i).Value = "" Then
Rows(i & ":" & i).EntireRow.Hidden = True
End If
Next i
End With
End Sub
i hope this can help you!
Have a nice Christmas end a great New Year!
Pedro
"Luke" wrote:
I have a spreadsheet which contains a lot of rows with no data, I would like
to create a macro to hide these rows.
Preferably I would like it to work off one column and hide any rows with a
value of zero.
Any ideas?
|