Hi
I have corrected my mistake in post #2 and redefined answer (now Response as Long).
Sorry about that. (I have edited post #2 rather than post the revised code.)
I have tried the code and can find no problems.
Obviously I cannot test your subs UnhideOpen, UnhideTSC, UnhideRoutine, and UnhideDemo.
I think it is in one of these that the problem must lie,
Can you post these subs, or better still a sample version of your workbook?
Cheers
Bookmarks