Kimberly se pregunta si hay una fórmula que pueda usar para poner en una celda la fecha en que se guardó por última vez el libro. Incluso si abre el libro de trabajo todos los días, solo quiere que se actualice la fecha cada vez que elija guardar.

No existe una fórmula para hacer esto; Excel no tiene la capacidad nativa. Sin embargo, puede crear una macro simple que pegará un valor de fecha en una celda cada vez que guarde el libro. Esto se basa en el evento BeforeSave, que pertenece al objeto ThisWorkbook:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _   Cancel As Boolean)



Sheets(1).Range("A1").Value = Now()

End Sub

Esta macro coloca la fecha (en realidad, el valor devuelto por la función Ahora) en la celda A1 de la primera hoja de trabajo del libro. Esa celda debe formatearse dentro de Excel al formato que desee. Existe un posible inconveniente de esta macro: si usa Guardar como (para guardar el libro de trabajo con un nombre diferente) y luego elige cancelar el guardado, la fecha aún se actualiza porque tuvo lugar antes del guardado, es decir, tuvo lugar justo cuando Excel estaba comenzando a guardar el libro, no después de que el libro se guardó realmente.

Cabe señalar que Excel también incluye un evento AfterSave que puede tener la tentación de usar para actualizar la información. Desafortunadamente, también tiene algunas lagunas y no ofrece nada más infalible que el evento BeforeSave.

Si lo prefiere, puede utilizar un enfoque basado en macros ligeramente diferente.

Éste se basa en una macro normal, no en un controlador de eventos:

Function LastModified() As Date     Application.Volatile     LastModified = ThisWorkbook.BuiltinDocumentProperties("Last Save Time")

End Function

Dentro de cualquier celda en la que desee que aparezca la fecha, llamaría a la macro de esta manera:

=LastModified()

La fórmula devuelve la fecha y la hora en que se guardó por última vez el libro, y puede formatearlo de la forma que desee. Dado que la función se considera volátil, se actualiza continuamente cada vez que se recalcula la hoja de trabajo.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (13575) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365.