How to Fix a Kernel32.DLL Error? : Can you have multiple levels of protection on a worksheet? [Anwsered]

Can you have multiple levels of protection on a worksheet?

Solutions to the Problem Can you have multiple levels of protection on a worksheet?

While I understand how to create a worksheet where so cells are locked and other are not, I am wondering if you can have two different levels of protection on the same worksheet.
I have a file where multiple people will need to input their data into their own specific sheet. Within that sheet there are lines with subtotals. I currently have them set to lock with the worksheet protection on. This allows them to enter data but not
adjust the subotals lines.
I want to add another level of security/password so the people inputting the data can only access their sheet. If I set individual passwords doe each sheet, when they unlock their own sheet, they also unlock the protection on the
subtotals.
Basically I have cost center 1,2,3,4,5 where I want 1 to have access to only 1, 2to only 2and so on. I just do not want to drop the protection on the subtotals line.
I probaby have confused eveyone, but I thought I would try.

Copy/paste this code in ThisWorkbook code module:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Dim v As Variant
    Dim bln As Boolean

    If Sh.Name = "Sheet1" Then Exit Sub

    v = Application.InputBox("Insert password")

    If Sh.Name = "Sheet2" And v = "abc" Then
        bln = True
    ElseIf Sh.Name = "Sheet3" And v = "xyz" Then
        bln = True
    Else
        bln = False
    End If

    If bln = False Then
        MsgBox "Operation is not allowed." & vbNewLine & _
            "Select " & Sh.Name & " and enter the correct password."
        ThisWorkbook.Worksheets("Sheet1").Select
    End If

End Sub
Select Sheet1 and then Sheet2 or Sheet3.

Mauro Gamberini - Microsoft© MVP(Excel)
http://www.maurogsc.eu/

To install drivers and other optional updates

To install optional updates, you need to review and then select them from the list of updates that Windows finds for your computer. Optional updates are not installed automatically.
Open Windows Update by clicking the Start button Picture of the Start button, clicking All Programs, and then clicking Windows Update.
In the left pane, click Check for updates, and then wait while Windows looks for the latest updates for your computer.
If any updates are found, click View available updates.
Select the optional updates that you want, and then click Install. Administrator permission required If you are prompted for an administrator password or confirmation, type the password or provide confirmation.

Recommended Method to Fix the Problem: Can you have multiple levels of protection on a worksheet?:

How to Fix Can you have multiple levels of protection on a worksheet? with SmartPCFixer?

1. Click the button to download SmartPCFixer . Install it on your computer. Open it, and it will scan your system. The junk files will be shown in the scan result.

2. After the scan is finished, you can see the errors and problems need to be repaired. Click Fix All.

3. The Repair part is done, the speed of your computer will be much higher than before and the errors have been fixed. You can also use other functions in SmartPCFixer. Like dll downloading, junk file cleaning and print spooler error repair.