That seems to be simply unhiding all the hidden rows in that range for me;
it does seem to hide the currently unhidden ones. Are you seeing it work
differently than that?

Rick


"Bob Phillips" wrote in message
...

With Rows("4:10")

.Hidden = Not .Hidden
End With

--
__________________________________
HTH

Bob

"pgarcia" wrote in message
...
Hello all,
If rows a4-a10 are hidden, then un-hide, but if they are un-hidden, then
hide.
Looking for a VB.

Thanks.