¿Si escribes en una celda las otras 3 celdas se bloquean?
Otra vez desde el principio, si escribo en la E12, ¿bloqueo las celdas F12, G12, H12? ¿Correcto? Y qué pasa con la celda E12, ¿esa no se bloquea?
Prueba con esta macro:
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Not Intersect(Target, Range("E12:H12")) Is Nothing Then
ActiveSheet.Unprotect "abc"
Range("E12:H12").Locked = True
Target.Locked = False
ActiveSheet.Protect "abc"
End If
End Sub
Sigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
- Del lado derecho copia la macro
Si esto va a funcionar para más filas, entonces cambia en la macro H12 por la última fila de tu encuesta.
Saludos. Dante Amor
Si es lo que necesitas.