Ingresar fecha en automático en Excel

Por   12/12/2017

En ocasiones es necesario almacenar en la fila de captura de Excel, la fecha en que fue capturado el registro, pero que esa fecha se ingrese en automático al capturar un dato, pero también que la fecha no cambie con la fecha del sistema.

Es decir, la fecha no deberá ser el resultado de la fórmula Hoy( ), ya que esta fecha cambia diariamente.

La solución se puede dar con una macro, por ejemplo, si se captura un dato en la columna A, en automático la macro pondrá en la columna B la fecha del sistema.

fecha-automatica-excel

En la macro se deberá cambiar la columna “A” por la columna donde van a capturar el dato. La macro en automático pondrá en la siguiente columna la fecha del sistema.

Código de la macro

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Columns("A")) Is Nothing Then

If Target.Count > 100 Then Exit Sub

For Each c In Target

If c.Value = "" Then

c.Offset(0, 1) = ""

Else

c.Offset(0, 1) = Date

End If

Next

End If

End Sub

Sigue las Instrucciones para poner la macro en los eventos de worksheet

  1. Abre tu libro de excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. Del lado izquierdo dice: VBAProject, abajo dale doble clic a worksheet(tu hoja)
  4. En el panel del lado derecho copia la macro

Listo, escribe un dato en cualquier celda de la columna A, la fecha aparecerá en automático.

Nota: Si borras el dato de la columna A, también se borra la fecha.

Descargar archivo

Contenido relacionado:
Compartirlo
Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.


Déjenos su opinión

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc., pero debe hacerlo con respeto, sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.