Macro cuando cambia celda

Puedes consultar, entre otras, estas respuestas:

http://tinyurl.com/fbxxv (con permiso de Hector Miguel)

o esta otra:

http://tinyurl.com/jgs8z (esta de KL)

Un saludo,
FindeO


"Jon" escribió:

Hola a todos!
Quiero ejecutar una macro cuando cambia el valor de una celda determinada,
por ejemplo la D14. Si hago como pongo aqui, me ejecuta cuando cambio
cualquier cosa en la hoja, y no se como hacer para cambiarlo. Espero que
podais ayudarme.
Gracias!

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Call mi_funcion
End Sub

Gracias, justo estaba mirando otros mensajes!
Al final he hecho lo siguiente y funciona bien: Cada vez que se cambia una
celda, comprueba si es la D14 y si es así llama a una función. Una vez que ha
terminado se pone en la celda D15 como si hubieramos dado a ENTER.
Nuevamente muchas gracias...
Y no sabreis lo de las condiciones en graficos, verdad?

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect([D14], Target) Is Nothing Then Exit Sub
Call Esquemas ' Se pone el dibujo correspondiente
Range("D15").Select 'Me pongo en la siguiente fila
End Sub

"Findeo" wrote:

Puedes consultar, entre otras, estas respuestas:

http://tinyurl.com/fbxxv (con permiso de Hector Miguel)

o esta otra:

http://tinyurl.com/jgs8z (esta de KL)

Un saludo,
FindeO


"Jon" escribió:

> Hola a todos!
> Quiero ejecutar una macro cuando cambia el valor de una celda determinada,
> por ejemplo la D14. Si hago como pongo aqui, me ejecuta cuando cambio
> cualquier cosa en la hoja, y no se como hacer para cambiarlo. Espero que
> podais ayudarme.
> Gracias!
>
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> Call mi_funcion
> End Sub