Cómo saber si una celda ha cambiado de valor?

Necesito que una función se ejecute solamente cuando la celda "B4" cambie
de valor.
Alguien sabe cómo se hace?

Prueba con:

'*************************************************
Private Sub Worksheet_Change(ByVal Target As Range)


If Not Target.Address = "$B$4" Then Exit Sub

'Tu código aquí..
'
'
'
'
End Sub
'***************************************************

Pegalo en la hoja en donde necesites detectar el cambio
(En la pestaña de la hoja: Boton Derecho--> Ver código )

Buenas noches amigo Roberto;

Quisiera incorporar un código parecido, es decir al cambiar el valor de la
celda J25 ( a cualquier valor) se ejecute una macro.

Gracias

PD. He probado la instrucción que dices, pero no me funcionó.




"Hernandez, Roberto" escribió en el mensaje
news:

> Necesito que una función se ejecute solamente cuando la celda "B4"

cambie

> de valor.
> Alguien sabe cómo se hace?

Prueba con:

'*************************************************
Private Sub Worksheet_Change(ByVal Target As Range)


If Not Target.Address = "$B$4" Then Exit Sub

'Tu código aquí..
'
'
'
'
End Sub
'***************************************************

Pegalo en la hoja en donde necesites detectar el cambio
(En la pestaña de la hoja: Boton Derecho--> Ver código )

Saludos Carlos:
Has tratado así?
Recuerda que tiene que estar pegado en la hoja donde quieras detectar el
cambio...

'*************************************************
Private Sub Worksheet_Change(ByVal Target As Range)

If Not Target.Address = "$J$25" Then Exit Sub

Msgbox "La celda J25 ha cambiado a: " & [J25]

End Sub
'***************************************************

Carlos Colls wrote:

Buenas noches amigo Roberto;

Quisiera incorporar un código parecido, es decir al cambiar el valor de la
celda J25 ( a cualquier valor) se ejecute una macro.

Gracias

PD. He probado la instrucción que dices, pero no me funcionó.




"Hernandez, Roberto" escribió en el mensaje
news:
> > Necesito que una función se ejecute solamente cuando la celda "B4"
cambie
> > de valor.
> > Alguien sabe cómo se hace?
>
> Prueba con:
>
> '*************************************************
> Private Sub Worksheet_Change(ByVal Target As Range)
>
>
> If Not Target.Address = "$B$4" Then Exit Sub
>
> 'Tu código aquí..
> '
> '
> '
> '
> End Sub
> '***************************************************
>
> Pegalo en la hoja en donde necesites detectar el cambio
> (En la pestaña de la hoja: Boton Derecho--> Ver código )
>
>