comboboxs in a userform handling a protected workbook and worksheets

I have created a userform1 with two dependant combo boxes, the worksheets and workbook is protected and I am struggling to place the unprotect function in the correct place. The purpose is to select from combo box one then select from combo box two; the value in combo box two is used by a command button on the user form to open the desired worksheet. Here lies the problem when everything is protected.
Location is combo box one and sheet name is combo box two.

The code functions without protection on.

Please Login or Register  to view this content.

The issue is relating to "hidden" and not password related. The code is fully functional for both protected and unprotected workbook and worksheets.
The problem relates to [code] actWsh = ComboBox2.Text Worksheets(actWsh).Select [code] obviously the worksheet has to be unhidden for actWsh (active worksheet) to function.
I believe I've uploaded a representative file. password = password

Hi there,

See if the attached version of your workbook does what you need. It uses the following code:

Please Login or Register  to view this content.

Selecting a new sheet via the ComboBoxes automatically hides whichever "target" worksheet was selected previously.


Hope this helps - please let me know how you get on.

Regards,

Greg M

Remove the code ActWsh.Visible=xlsheetvisble and replace it with Worksheets(ActWsh).Visible=xlSheetVisible Fixed the code