I have form that I am working on that has approximately 120 check boxes (I used the forms check boxes). I read previous threads about creating a macro to clear out the checks, which I have done successfully, but I would like the macro to do one more thing ... After clearing out all of the checks, I would like it to place checks on a range of check boxes.

I thought I could use the following script, but it doesn't work when the sheet is protected.

Sub UnCheckBox()

With Sheet1

.CheckBoxes.Value = False

Range("N55:N209").Select
Selection.Replace What:="FALSE", Replacement:="TRUE", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

End With

End Sub

Can someone help please?

Thanks!