Protección contra escritura pero no contra entrada de datos.

Hola. Me gustaría saber como puedo proteger una hoja contra escritura o contra entrada de datos por teclado dejando libre la entrada de datos desde un botón en una macro de otra hoja.

Gracias