Ayuda urgente para macro sencilla con condición

[leonelcuenca]

tengo esta macro y lo único que necesito es que una celda se desbloquee SÓLO cuando en esa misma celda apareza lo siguiente "Ingrese la Agencia" este texto aparece debido a que en dicha celda hay una fórmula que consiste en un buscar y si consigue error coloca "Ingrese la Agencia" entonces hasta ahora llevo lo siguiente, el problema ela macro que realicé, excel no la reconoce automáticamente es decir cuando cambio en la celda b12 aparece "ingrese la agencia" no se desbloquea la celda b12 esto es lo que tengo por favor espero su ayuda urgente muchas gracias!

la primera macro la tengo ubicada en el objeto hoja presupuesto no se si debe estar allí o en el módulo tampoco se si hay una macro que haga lo que hacen las dos macros pero en una sola en vez de llamar a la macro bloqueo

1)

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = ("b12") Then

If Target.Value = "Ingrese la Agencia" Then

Application.EnableEvents = False

Application.ScreenUpdating = False

Call Bloqueo

Application.EnableEvents = True

Application.ScreenUpdating = True

End If

End If

End Sub

2)

Sub Bloqueo()

With Worksheets("Presupuesto")

.Unprotect Password:="321"

.Range("B12").Select

Selection.Locked = False

.Protect Password:="321", userinterfaceonly:=True, DrawingObjects:=False, Contents:=True, Scenarios:=True, AllowInsertingRows:=True

.EnableOutlining = True

End With

End Sub

[tese1969]

En este foro no se solicita ayuda "urgente" y además léete primero las normas del foro, para que te des cuenta de que nadie te debería responder si no las cumples.

Un saludo,

Tese

[leonelcuenca]

es cierto disculpa me estaban presionando acá en el trabajo por ese archivo espero por su apoyo y de verdad muchas gracias a cualquier persona que me de una mano! por lo que he podido ver todos son de gran ayuda es admirable lo pacientes y respetuosos que son, saludos hermanos!

[leonelcuenca]

aca está el archivo, saludos!

Prueba.rar