Macro auto_close

Buen día experto...
Mi duda es la siguiente: necesito hacer una macro para que al cerrar el archivo se actualize en la celda G2 la fecha. Mi hoja debe llamarse citas.
Intente con la siguiente macro, pero solo me funciona al compilarla... Y no cuando cierro el libro...
podrían ayudarme... Gracias
'macro para autogenerar fecha antes de cerrar libro
Sub Auto_Close()
Sheets("citas").Range("G2").Value = "=hoy()" 'fecha actual
ActiveCell = Now
ActiveWorkbook.Save
End Sub

1 Respuesta

Respuesta
1
Prueba así
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("citas").Range("G2") = Date
ActiveWorkbook.Save
End Sub
Aun no me funciona...
¿O la tengo que hacer como modulo?
Unicamente cuando la corro desde el visual me funciona...
Recuerda que debes guardar el libro habilitado para macros, es decir, .xlsm sino no te funcionara

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas