¿Cómo insertar la marca de tiempo actual cuando los datos en otra celda cambian en Excel?
Supongamos que recibe una hoja de trabajo que necesita que modifique los datos en una determinada columna. Y después de modificar la hoja de trabajo, debe insertar la marca de tiempo modificada para que otros sepan qué celdas se han cambiado. ¿Como lidiar con? Este artículo le mostrará el método para insertar la marca de tiempo actual cuando los datos en otra celda cambian en Excel como se muestra a continuación.
Inserte la marca de tiempo actual cuando los datos en otra celda cambien con el código VBA
Inserte la marca de tiempo actual cuando los datos en otra celda cambien con el código VBA
Como se muestra en la siguiente captura de pantalla, debe completar la marca de tiempo en la columna E si se cambian las celdas correspondientes en la columna C. Haz lo siguiente.
1. En la hoja de trabajo necesita modificar y marcar con marca de tiempo, haga clic con el botón derecho en la pestaña de la hoja y luego haga clic en Ver código desde el menú contextual.
2. Luego copie y pegue el siguiente código VBA en el Código ventana del Microsoft Visual Basic para aplicaciones ventana. Ver captura de pantalla:
Código de VBA: inserte la marca de tiempo actual cuando cambien los datos en otra celda
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20180830
Dim xCellColumn As Integer
Dim xTimeColumn As Integer
Dim xRow, xCol As Integer
Dim xDPRg, xRg As Range
xCellColumn = 3
xTimeColumn = 5
xRow = Target.Row
xCol = Target.Column
If Target.Text <> "" Then
If xCol = xCellColumn Then
Cells(xRow, xTimeColumn) = Now()
Else
On Error Resume Next
Set xDPRg = Target.Dependents
For Each xRg In xDPRg
If xRg.Column = xCellColumn Then
Cells(xRg.Row, xTimeColumn) = Now()
End If
Next
End If
End If
End Sub
Note: En el código, el número 3 significa que va a modificar los datos en la columna C, y el 5 indica que la marca de tiempo se completará en la columna E. Cámbiela según sus necesidades.
3. presione el otro + Q llaves para cerrar el Microsoft Visual Basic para aplicaciones ventana.
De ahora en adelante, al cambiar los datos en la columna C, la marca de tiempo se completará en las celdas correspondientes en la columna E, como se muestra a continuación.
Propina. Selector de fechas. Insertar la fecha utilidad de Kutools for Excel le ayuda a insertar rápidamente la fecha con el formato de fecha especificado en una celda seleccionada.
¡Descárgalo y pruébalo ahora! (Pista gratuita de 30 días)
Artículos relacionados:
- ¿Cómo insertar o mostrar la última marca de tiempo guardada en la hoja de trabajo en Excel?
- ¿Cómo insertar la marca de tiempo en una celda específica cuando se ejecuta una macro en Excel?
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!