Fecha de actualización de un libro

Hola Giuseppe,

Puedes poner el siguiente codigo en el modulo VBA de
EsteLibro(ThisWorkbook):

Private Sub Workbook_BeforeSave(ByVal SaveAsUI _
As Boolean, Cancel As Boolean)
ThisWorkbook.Worksheets("Hoja1").Range("A1") = Date
End Sub

...o bien

Private Sub Workbook_SheetChange(ByVal Sh _
As Object, ByVal Target As Range)
ThisWorkbook.Worksheets("Hoja1").Range("A1") = Date
End Sub

Ojo - los dos codigos tienen sus desventajas:

- el primero apuntara la fecha si se guarda el libro sin haber cambiado
nada.
- el segundo solo se disparara si cambian los valores en las celdas, pero no
resultados de formulas, formatos, comentarios, etc.

Saludos,
KL

"Giuseppe" wrote in message
news:375901c51f69$3a97a110$
Hola,

¿Como puedo generar en una celda de un libro la fehc ade
actualización del mismo?

Es decir, cuando se hace una modificación en un libro de
un archivo de Excel ¿como se puede mostrar esa fecha de
modificación en una celda del mismo libro?

De antemano muchas gracias por la ayuda.

Saludos,
Giuseppe