Ayuda con "change"

Breve ejemplo:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
'
'Lo que tengas que hacer
'
End If
End Sub

Lo anterior tendrías que ponerlo en el módulo de la hoja (click derecho sobre su etiqueta->Ver código).
Un saludo.


Fernando Arroyo
MS MVP - Excel

"nobody" escribió en el mensaje news:

Hola grupo:

Tengo un problema:

Necesito hacer una subrutina que inicie cuando se cambie el valor de una
celda, pero no se como se hace...

Si alguien puede ayudarme con un breve ejemplo, se los agradeceré mucho

Saludos

Espero que esto te sirva:

Escribe esto en el área de código de la hoja que
quieres avaluar:

Private Sub Worksheet_Change(ByVal Target As Range)
'suponiendo que es la celda A1 la que quieres evaluar
If Target.Address = "$A$1" Then
'...
'aqui van tus instrucciones
'...
End If
End Sub

Saludos
Rene Moreno
____________________________________________________
Para responder elimine el texto NOSPAM de la dirección de envío
"nobody" escribió en el mensaje
news:

Hola grupo:

Tengo un problema:

Necesito hacer una subrutina que inicie cuando se cambie el valor de una
celda, pero no se como se hace...

Si alguien puede ayudarme con un breve ejemplo, se los agradeceré mucho

Saludos

Gracias!!!!

Saludos


Rene Moreno escribió en el mensaje de noticias
#

Espero que esto te sirva:

Escribe esto en el área de código de la hoja que
quieres avaluar:

Private Sub Worksheet_Change(ByVal Target As Range)
'suponiendo que es la celda A1 la que quieres evaluar
If Target.Address = "$A$1" Then
'...
'aqui van tus instrucciones
'...
End If
End Sub

Saludos
Rene Moreno
____________________________________________________
Para responder elimine el texto NOSPAM de la dirección de envío
"nobody" escribió en el mensaje
news:
> Hola grupo:
>
> Tengo un problema:
>
> Necesito hacer una subrutina que inicie cuando se cambie el valor de una
> celda, pero no se como se hace...
>
> Si alguien puede ayudarme con un breve ejemplo, se los agradeceré mucho
>
> Saludos
>
>