Hide/Unhide Rows VBA code Changes Help

Hi Krishnakumar,
Thanks for replying so quickly.

The code has worked really well, I only had to change the 'Y' as it was hiding the wrong rows and leaving the blanks visible so i have changed the 'Y' to a '0' so it is now hiding the correct rows.

I have added the code to another sheet within the workbook, it uses the same froumla to pull the
data in but provides me with other information.
The code doesnt seem to protect all of the sheet this time as it leaves Coloum A,C unprotected, is there a way to fix this? It does protect the 'Review' sheet 100% as originally hoped.

It also seems to be updating every time a make a change, is there a way to upate only if i make a change to the 'Department codes' sheet only? as that is the only sheet the directly impacts on the rows to be hidden or displayed.

Thanks again for all your help, its great.

Cheers

Justin.

Hi there,

Thanks for all the time you have spent on this, it really is appreciated.
I think we are almost there.
The only thing is it doesn’t seem to want to hide is column C in any of the sheets I have the code in including the 'Reviews' sheet?
Also the redo/undo buttons don’t work in any of the sheets and the only other thing I have noticed is that the cursor Box has disappeared and also the tab button seems to be disabled is there a way to fix it?

Cheers again for your help

Justin.

Hi there,

Sorry for the confussion I ment to say it does not protect column C (not hide as I mentioned in the last post) sorry.
The first piece of code you gave me is used in the 'Reviews' sheet and the last piece of code you posted is now in the 'department codes' sheet.

Thanks again

Justin.

Hi there,
I Have removed the old code and protected column C as you have described and it all works now, all the issues I was having with cursors, tabs etc are now fixed. Thank you so much!

Could I just ask one last question..... I need to add another sheet in that will be set up in exactly the same way as the 'Review' sheet With the formulas etc as described in my first post, I tried to add and extra line to your code like below however it didn't work as it only updates the first sheet that you go into, is there a way that it would update both sheets or that I could add further sheets to it in the future.

[code]
set r = sheets("Training Summary").Range("a7:a454")
[\code]

Once again I really appreciate the time you have given up for me.

Thank you so much

Justin.

Hi Kris,

Thanks so much it works perfectly!

Thanks so much for all the time you have spent helping me.

Cheers Again

Justin.