run my macro in protected sheet

[tintin1012000]

i need to run this macro in a protected sheet, I have found some solutions online but cant get them to work

macro is

Sub HideRows()
dim i As Long
For i = 3 To 168
Rows(i).Hidden = Range("V" & i).Value = 0 And Range("a" & i).Value = 0
Next i
End Sub

password to unprotect the sheet is rangerover

 

[VoG]

Try

Sub HideRows()
Dim i As Long
ActiveSheet.Unprotect Password:="rangerover"
For i = 3 To 168
    Rows(i).Hidden = Range("V" & i).Value = 0 And Range("a" & i).Value = 0
Next i
ActiveSheet.Protect Password:="rangerover"
End Sub