Lock cells in multiple sheets

[Goddess]

Hi,

I have an excel worksheet with multiple sheets. I need to quickly lock all the cells with formulas as I do not want anyone to mess with the formulas.

I know how to lock the cells in each individual sheets, but I'm wondering if there is a way to lock the cells in multiple sheets at once. I tried googling, but can't find a solution (I'm not good in macro or vba).

Thanks in advance for any feedback!

 

[Saurabhj]

Hi,

On workbook use below code:

Private Sub Workbook_Open()
    Dim sh As Worksheet
    
    For Each sh In ThisWorkbook.Sheets
        sh.Protect Password:="password"
    Next
End Sub