Locking/Protecting worksheet limits user activities.

[Livin404]

Greetings, I secured/protected my worksheets/workbook, but when I I do I cannot use my macro buttons I created with shapes, and I get an error which links to the code below. The code works good as long as I do not protect the sheet. The VBA Code that won't work is:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("O3:O500").Value = Range("C3:C500").Value
End Sub

I'm sure coming up with a code to use the above macro is necessary .

The second part of my question is coming up with a macro so I can use my buttons while the sheet is protect. Am I to use something like?

Sub SheetProtection()
'Checks if the Training sheet:
'  -  If it is PROTECTED ... then UNPROTECT it
'  -  If it is UNPROTECTED ... then PROTECT it

    If ThisWorkbook.Sheets("Xman").ProtectContents = True Then
      ThisWorkbook.Sheets("Xman").Unprotect "mozzer"
    Else
      ThisWorkbook.Sheets("Xman").protect "mozzer"
    End If
End Sub

Then for each macro that uses a command button do I insert

Call SheetProtection

at the beginning and end of the macros.
I'm asking these two now, since I cannot do anything until the first macro is sorted.
Thank you,

 

[Fluff]

Yes you would add that at the start & end of the macros, but you only need to do that if the code is working on the Xman sheet.

 

[Livin404]

Yes you would add that at the start & end of the macros, but you only need to do that if the code is working on the Xman sheet.

Thank you, I did that I think it's nearly working; however, the autofit does not want to work despite using the macro described above. I've attached an image. I put that same macro on Sheet one thought i don't think it's necessary. It is also in the Module "Clean up". Thank you,

 

[Livin404]

I think it is working now. It didn't like me have the macro on this sheet as well as in a Module. I just removed it from this sheet. It seems fine now. Thanks.

 

[Fluff]

Glad you sorted it & thanks for the feedback.