¿Qué macro puedo utilizar en este caso?

Actualmente utilizo este código

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("E8:F8")) Is Nothing Then

ActiveSheet.Unprotect "test"

Range("E8:F8").Locked = True

Target.Locked = False

ActiveSheet.Protect "test"

Esta macro bloquea las celdas E8:H8 al momento de escribir en cualquiera de esas celdas, pero quisiera que el bloqueo se deshabilitara si erróneamente escribo en la celda incorrecta, por ejemplo erróneamente escribo en la celda G8 y se bloquean la E8, F8, H8, pero en un principio quería escribir en la celda F8,¿habrá manera de regresarme?

Espero y puedas apoyarme Expertos

Saludos!

Añade tu respuesta

Haz clic para o