protecting cells with formula's in them

I found it after I looked at help and I figured that part out, sorry I didn't post that right away I do however have another problem. I have a few macro's which clear out the excel sheet and basically start with the entered amounts all blanked out for some cells as well as hide some rows, and then unhide them as needed. With the sheet protected, I get a run time error. I tried to use
Sheets(?sheetname?).UnProtect userinterfaceonly:=true
which I have found on google but that did not help. I am getting a Run-time error '1004': Unable to set the hidden property of the range class. Any idea how to fix that?

This is what it records if I do it from the keyboard (comment added) in Excel 97.

' Protect
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

' Unprotect
ActiveSheet.Unprotect

Apparently, something is wrong with userinterfaceonly. It might be that it's version dependent. Luckily, each version comes with it's own macrorecorder, so you won't have any problem to find out what to use.

I don't have any doubt that you can substitute:
Sheets("Sheet1") for ActiveSheet, but if you want to do other things on the screen there's no objection to make it the active sheet first. This is the code for it (I first guessed it, then checked it through recording):

' Make sheet active
Sheets("Sheet1").Select

Hope this helps.


Kees

That worked like a charm!! Thank you Kees. I appreciate it, I don't know why I didn't think of the macro recorder in the first place.