How do I lock and unlock cells?

[AChimpNamedCornelius]

application.Worksheets("MyWorksheet").Range("A1", "R7").Locked = True

seems to not bomb at least, but I can still edit the cells. I go to Tools->Protection and protect the sheet, but then all cells are uneditable, not just the ones I want.

How do I make things like column headers, etc. unchangeable while still allowing the editing of the other cells?

I need to do this via code at startup to take care of people unlocking them by accident. In a similar post, the one response suggested recording a macro, locking a cell, then checking out what the macro recorded. That did nothing for me as the macro record button is grayed out.

 

[Andrew Poulsom]

Cells are locked by default, but the locking has no effect unless the sheet is protected.

So you need to unlock the cells you want the user to be able to edit then protect the sheet.