I would suspect you have some other code running to cause this. The code
you've posted works fine for me.


"Mark Dullingham" wrote in
message ...
I want to hide rows 5,6 and 7 in a worksheet, I recorded the following
macro
but it hides all rows containing data from 5 downwards.

Sub HideSetupRows()
Rows("5:7").Select
Range("B5").Activate
Selection.EntireRow.Hidden = True
Range("B8").Select
End Sub

I have no idea why this happens, could any one offer an expaination?

Thanks in advance

Mark