Range.Locked (Excel)

Retorna ou define um valor que indica se o objeto está bloqueado.

Esta propriedade retorna True se o objeto estiver bloqueado, False se o objeto puder ser modificado quando a planilha estiver protegida ou Null se o intervalo especificado contiver células bloqueadas e não bloqueadas.

ActiveCell.Locked = True