probelm when apply locked for cells in protection option and lock scroll

Hi Mazan,

for worksheet protection you can add the following to the ThisWorkbook portion

Private Sub Workbook_Open()
    
    Sheet1.Protect "123456", userInterfaceOnly:=True

End Sub

This will eliminate the need to unprotect and protect every time your code runs.

As for the scroll problem, how are you preventing scrolling?