Good chance that BoundFlag isn't set properly or is out of scope. (or maybe
it is misspelled - using option explicit?).

Perhaps
Range("56:56").EntireRow.Hidden = Not _
Range("56:56").EntireRow.Hidden

to toggle.

--
Regards,
Tom Ogilvy


"Don Wiss" wrote in message
...
On Tue, 24 May 2005, Bob Phillips wrote:

I just knocked up a quick test and it worked fine for me. What code do
you
have in HideRateRows?

I don't have the code with me at home. And I have no Usenet access from
work. But basically something like this:

Application.ScreenUpdating = False
With Sheets("Pricing")
.Protect UserInterfaceOnly:=True
.Range("56:56").EntireRow.Hidden = BoundFlag
End With

Don <www.donwiss.com (e-mail link at home page bottom).