Copiar el valor de una celda cuando se actualice a otra celda por

hola, Oswaldo !

... es posible copiar una celda que se cambie por un vinculo externo al libro que estoy trabajando
que tan pronto se cambie se ejecute una macro o codigo donde me copie ese valor a otra hoja
con el fin de llevar un historico del cambio de esa celda en otra hoja que esta en el mismo libro.
Es para hacer una estadistica de cuantas veces cambio en el dia...

podrias comentar (de preferencia +/- exactamente) el tipo de "vinculo externo" que estas utilizando ?
y de que depende que la celda que lo contiene cambie de valor ? (como, cuando, donde, por que, etc.)
y de que hoja a cual otra (y donde) necesitas registrar los cambios ?

saludos,
hector.

Buen Día Héctor Miguel:

podrias comentar (de preferencia +/- exactamente) el tipo de "vinculo externo" que estas utilizando ?
y de que depende que la celda que lo contiene cambie de valor ? (como, cuando, donde, por que, etc.)
y de que hoja a cual otra (y donde) necesitas registrar los cambios ?

Con relación a lo que me pregunta le comento que el vinculo es de un
programa un .exe y que el me trae datos de internet y cada vez que cambia en
internet el me lo muestra en una hoja de calculo.

Cuando se actualiza trae un valor numerico, por ejemplo 1200 y despues
cambia a 1300, la idea es que cuando cambie a 1300, coja este valor y lo
copie a una hoja llamada "historico_datos", en la columna a y que valla
ocupando la celda que este vacia, en orden de arriba hacia abajo.

Espero haberme hecho compreder gracias por su paciencia.

Atentamente;


OSWALDO GAITAN ARAQUE
Bendiciones!

hola, Oswaldo !

... el vinculo es de un programa un .exe y que el me trae datos de internet
y cada vez que cambia en internet el me lo muestra en una hoja de calculo.
Cuando se actualiza trae un valor numerico, por ejemplo 1200 y despues cambia a 1300
la idea es que cuando cambie a 1300, coja este valor y lo copie a una hoja llamada "historico_datos"
en la columna a y que valla ocupando la celda que este vacia, en orden de arriba hacia abajo.

podrias comprobar/confirmar si cada que se actualiza "la celda" por efectos del ".exe"...
-> se "dispara" el evento '_change' en el modulo de codigo de "esa" hoja (donde esta "la celda") ???

(p.e.) haz un clic-secundario sobre la etiqueta con el nombre de "esa" hoja y copia/pega (o escribe) lo siguiente:
OJO: si "la celda" NO es [B5] modifica a la real el codigo propuesto <= OJO

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$5" Then MsgBox "El dato en B5 ha sido actualizado..."
End Sub

saludos,
hector.

__ previos __

podrias comentar (de preferencia +/- exactamente) el tipo de "vinculo externo" que estas utilizando ?
y de que depende que la celda que lo contiene cambie de valor ? (como, cuando, donde, por que, etc.)
y de que hoja a cual otra (y donde) necesitas registrar los cambios ?

Hola Héctor Miguel:

Ya ingrese el codigo como me lo indico pero no muestra el mensaje que se
esperaba, la celda se actualiza cada segundo por ejemplo y no me mostro el
mensaje. Me ayuda con otra opción de codigo es tan amable.

Gracias por su colaboración.

Atentamente;

OSWALDO GAITAN ARAQUE
Bendiciones!

hola, Oswaldo !

Ya ingrese el codigo como me lo indico pero no muestra el mensaje que se esperaba
la celda se actualiza cada segundo por ejemplo y no me mostro el mensaje...

(creo que) podriamos intentar "forzando" un (re)calculo de la hoja +/- asi:

- utiliza una formula (p.e. en la celda [A1]) que "jale/tome/..." el valor de "la celda" que se actualiza: ="la celda"
- copia/pega (o escribe) lo siguiente en el modulo de codigo de "esa" hoja (donde esta "la celda!")

Private Sub Worksheet_Calculate()
Static Anterior As Double
On Error Resume Next
If Range("a1") <> Anterior Then
Worksheets("la otra hoja").Range("a65536").end(xlUp).Offset(1) = Range("a1").Value
Anterior = Range("a1")
End If
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.