protect worksheet with check box

[Wanna Learn]

Hello
I added a check box using the control tool box. Then in the sheet code I
added the following
Private Sub CheckBox1_Click()
Rows("1:68").Select
ActiveSheet.Protect "pass"
ActiveSheet.Unprotect "pass"
End Sub
This is what Im trying to do when the check box is selected or checked
then rows 1 thru 68 will be protected else if the checked box is uncheck
sheet is unprotected

thanks in advance