You cannot use this command on a protected sheet.

Anonymous
2010-11-03T16:57:04+00:00

I have created a worksheet in which I've group certain rows. When I protect the sheet, the group function is no longer useable, I get the following error message: "You cannot use this command on a protected sheet. To use this command, you must first unprotect the worksheet (Review tab, changes groups, unprotect sheet button) You may be prompted for a password".  

Is there a way that I can lock/protect specific cells yet still use the group function?

Thank you,

Michele

Microsoft 365 and Office | Excel | For home | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 comments

7 answers

Sort by: Most helpful
Most helpful Newest Oldest
  1. Deleted

    This answer has been deleted due to a violation of our Code of Conduct. The answer was manually reported or identified through automated detection before action was taken. Please refer to our Code of Conduct for more information.

    Comments have been turned off. Learn more

  2. HansV 462.7K Reputation points MVP Volunteer Moderator
    2013-07-31T09:22:50+00:00

    If you want to apply the code to all worksheets:

    Sub Auto_Open()

        Dim wsh As Worksheet

        For Each wsh In Worksheets

            With wsh

                .Protect Password:="hi", UserInterfaceOnly:=True

                .EnableOutlining = True

                '.EnableAutoFilter = True

                'If .FilterMode Then

                '   .ShowAllData

                'End If

            End With

        Next wsh

    End Sub

    and if you want to apply it to specific sheets only:

    Sub Auto_Open()

        Dim wsh As Worksheet

        ' Specify the names of the sheets in the array

        For Each wsh In Worksheets(Array("Sheet1", "Sheet2", "Sheet3"))

            With wsh

                .Protect Password:="hi", UserInterfaceOnly:=True

                .EnableOutlining = True

                '.EnableAutoFilter = True

                'If .FilterMode Then

                '   .ShowAllData

                'End If

            End With

        Next wsh

    End Sub

    Was this answer helpful?

    0 comments
  3. Deleted

    This answer has been deleted due to a violation of our Code of Conduct. The answer was manually reported or identified through automated detection before action was taken. Please refer to our Code of Conduct for more information.

    Comments have been turned off. Learn more

  4. Anonymous
    2013-07-31T09:09:30+00:00

    What about for multiple worksheets? I tried adding another module but excel won'y allow 2 Auto_Open modules?.  I tried added 2 work sheet name ("Tab1", "Tab2) but got a Compile Error saying "Wrong number of arguments or invalid property assignment".

    Was this answer helpful?

    0 comments
  5. HansV 462.7K Reputation points MVP Volunteer Moderator
    2010-11-03T16:59:43+00:00

    You can use code to set the worksheet's EnableOutlining property to True. Seehttp://msdn.microsoft.com/en-us/library/bb221161(office.12).aspx

    Was this answer helpful?

    0 comments