Range.Locked (Excel)

Returns or sets a Variant value that indicates if the boolean is locked.

This property returns True if the object is locked, False if the object can be modified when the sheet is protected, or Null if the specified range contains both locked and unlocked cells.

ActiveCell.Locked = True