Lock Button that Locks Specific Cells

Hello-

This should be very simple, but I've run into an error:

What's trying to be accomplished:
- When user clicks on a button, VBA selects and locks a cell

What's been done:
- Very simple VBA code attached to a button:

Private Sub CommandButton1_Click()
Range("F6").Select
    Selection.Locked = True
End Sub

Sheet/Book conditions:
- The entire sheet is locked and protected with the exception of the cell (F6) and the button
- When protecting, 'select unlocked sells' and 'format cells' are checked

Current error I'm getting:
Unable to set the Locked property of the range class

This is very basic, and it has me stumped. Thoughts?

Thx!