¿Cómo ingresar automáticamente la fecha cuando se introduce datos en una columna?

Al trabajar en una hoja de cálculo, desea que la fecha y hora actual se ingresen automáticamente en la columna B al introducir datos en la columna A, como se muestra en la siguiente captura de pantalla. En Excel, ¿cómo podría intentar resolver esta tarea con una solución fácil y rápida?

Ingresar fecha automáticamente cuando se introducen datos en una columna con código VBA

Ingresar fecha automáticamente cuando se introducen datos en una columna con código VBA

Quizás no haya una manera directa para nosotros de manejar esta tarea en Excel, pero el siguiente código VBA puede ayudarte, por favor haz lo siguiente:

1. Selecciona la pestaña de la hoja en la que deseas insertar la fecha automáticamente, luego haz clic derecho sobre ella, elige Ver Código desde el menú contextual, luego en la ventana emergente de Microsoft Visual Basic for Applications, copia y pega el siguiente código en el Módulo:

Código VBA: Ingresar fecha automáticamente al introducir datos en otra columna:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("A2:A15")) Is Nothing Then
        With Target(1, 2)
        .Value = Date & " " & Time
        .EntireColumn.AutoFit
        End With
    End If
End Sub

2. Luego guarda y cierra esta ventana de código, regresa a la hoja de cálculo, ahora, cuando ingreses datos en la Columna A, la celda correspondiente en la Columna B ingresará la fecha y hora actual automáticamente de inmediato.

Nota: En el código anterior, A2:A15 son las celdas en las que deseas ingresar valores.