My Excel sheet 13 isn't Unprotecting. Please help!

[Tarali]

I gave the code, perhaps wronly:

sheet13.protect password = "2710"
to protect the sheet with the intent to use my password as 2710. However, I couldn't unprotect with password 2710. Please, help me. What could I do?

 

[Michael M]

We can't help you unprotect sheets if you are using the wrong password, even if by mistake...it's against our forum rules to do so.
you could check for leading/ trailling spaces OR check the numbers either side of 2710, ie...1710, 2719, 271-

 

[Tarali]

I should have given the code correctly as

Sheet13.Protect Password:="2710"

We can't help you unprotect sheets if you are using the wrong password, even if by mistake...it's against our forum rules to do so.
you could check for leading/ trailling spaces OR check the numbers either side of 2710, ie...1710, 2719, 271-

When I gave a code Sheet13.Protect password = "2710" (NOT...password:="2710"), the code might have read my password input to be something else and not my intention which is 2710.

I am asking if anyone could enlighten me what the VBA editor read as my protect password.

 

[Michael M]

If this is what your code line says

Sheet13.Protect Password:="2710"

then the sheet should unprotect with that number, Post all of the code you are currently using.
We won't assist in "breaking" any passwords, as I mentioned earlier, but we may see an issue in your code.

 

[Tarali]

If this is what your code line says

Sheet13.Protect Password:="2710"

then the sheet should unprotect with that number, Post all of the code you are currently using.
We won't assist in "breaking" any passwords, as I mentioned earlier, but we may see an issue in your code.

Link to my code in picture is in here --https://drive.google.com/file/d/1-gLWB9yjgqXKkZURYOUv_CTiO3PUye2f/view?usp=drivesdk

 

[Tarali]

Link to my code in picture is in here --https://drive.google.com/file/d/1-gLWB9yjgqXKkZURYOUv_CTiO3PUye2f/view?usp=drivesdkProtect Password:="2710"

Link to my code in picture is in here --https://drive.google.com/file/d/1-gLWB9yjgqXKkZURYOUv_CTiO3PUye2f/view?usp=drivesdk

My code line was not like that. I entered with mistake.

My code line was:
Sheet13.Protect Password = "2710"

 

[Michael M]

Works fine for me...
Try running a different sub in the Thisworkbook module

Sub MM1()
Sheet13.Unprotect Password:="2710"
End Sub

 

[Michael M]

Are you sure the code is actually getting to the Unprotect line ?
Try using F8 to step through the code to see if it jumps over those lines.
I did ask that you post the code so we could have a look through it ?

 

[Tarali]

VBA Code:
Sheet13.Protect Password:="2710"
then the sheet should unprotect with that number, Post all of the code you are currently using.
We won't assist in "breaking" any passwords, as I mentioned earlier, but we may see an issue in your code.
code line was not like that. I entered with mistake.

My code line was:
Sheet13.Protect Password = "2710"

 

[Tarali]

VBA Lines given are as follows:
Sub ShowTEST_AnalysisConditional()

Application.ScreenUpdating = False
'GROUP A ---WHEN ALL TEST REQUIRED GIVEN IN AN AP
If Sheets("Switch").Range("Q10").Value <> "" And _
Sheets("Switch").Range("S10").Value <> "" And _
Sheets("Switch").Range("U10").Value <> "" And _
Sheets("Switch").Range("W10").Value <> "" And _
Sheets("Switch").Range("Y10").Value <> "" Then

Application.ScreenUpdating = False
Sheet13.Unprotect Password = "2710"
ActiveSheet.PageSetup.PrintArea = "$A$2:$AB$47,$A$50:$AB$96,$A$98:$AB$146,$A$148:$AB$194,$A$198:$AB$244"
Sheets("Tests_Analysis").scrollarea = "$A$2:$AB$244"
'Call RectangleT3_Covered
'Call RectangleT4_Covered
'Call RectangleT5_Covered
Sheet13.Protect Password = "2710"
Application.ScreenUpdating = True

End if

End Sub