Best way to Protect a spreadsheet

[GMC The Macro Man]

Hi guys,
I'm trying to find the best way to protect a spreadsheet and looking to see what others use.
I have a spreadsheet with 1 worksheet for the users to input their data followed by up to 10 worksheets that use the data to create reports and dashboards etc.
I only want the users to see the value on the dashboards, I don't want them to see the formula in the formula bar at the top and I don't want them to be able to make changes so I under FORMAT I use the Protect Sheet and give it a password, I also make sure the cells are Locked & Hidden.
Is his the best way to do this?
Also, is there an easier way to unprotect / protect multiple sheets at once as it's a pain if I have to make changes

Thanks as always

 

[Georgiboy]

Your method to protect and hide the formulae seems good.

As for ptotect/ unprotect multiple sheets, you could write a macro for that and then lock the VBA in the spreadsheet?

 

[GMC The Macro Man]

Thanks Georgiboy, appreciate your time in replying to my question. I will look at the VBA option for the protection on Multiple sheets

 

[Georgiboy]

Maybe the below will help with that, it will protect all sheets if not protected or unprotect if they are:

Sub ProtectUnprotect()
    Dim ws As Worksheet, pwd As String
    
    pwd = "password"
    
    For Each ws In Sheets
        If ws.ProtectContents Then
            ws.Unprotect pwd
        Else
            ws.Protect pwd
        End If
    Next ws
End Sub

You could exclude a sheet as below if needed:

Sub ProtectUnprotect()
    Dim ws As Worksheet, pwd As String
    
    pwd = "password"
    
    For Each ws In Sheets
        If ws.Name <> "Sheet1" Then
            If ws.ProtectContents Then
                ws.Unprotect pwd
            Else
                ws.Protect pwd
            End If
        End If
    Next ws
End Sub