Insertar hora
Que tal, tengo un problema con excel, en mi trabajo, necesito que cuando ponga cualquier información en una celda, ej. E6, automáticamente se inserte la hora de captura en la celda H6. A ver si me puedes echar la mano. De antemano, Gracias
1 respuesta
Respuesta de Elsa Matilde
1
Debes habilitar el Editor de Visual Basic (o Alt+F11), seleccionar de la columna izquierda, en VBA projects y el nombre de tu libro la hoja donde quieras colocar la macro (yo supuse que sería la hoja 1).
Con doble clic se habilita la ventana para que copies el siguiente código:
Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Column = 2 and activeCell.Row > 2 Then 'ver (1)
fila = ActiveCell.Row - 1
With Worksheets("Hoja1").Cells(fila, 2) 'ver (2)
If .Value <> "" Then
Worksheets("Hoja1").Cells(fila, 4).Value = Time 'ver (3)
End If
End With
End If
End Sub
Aclaraciones:
(1) supone que el dato que llama la macro está en la columna B, si la querés en E será 5
(2) Reemplazar "Hoja1" por la que vas a usar. Otra vez donde dice 2 colocar el número de la columna donde se ingresa el dato.
(3) Otra vez reemplazar "Hoja1" si hiciera falta. El 4 significa que la hora se mostrará en la columna D. Si es H será 8
Guardá y cerrá el libro. Cuando lo abras ya estarás en condiciones de trabajarlo.
Cualquier duda volvé a escribirme, de lo contrario por favor no olvides de finalizar la consulta.
Con doble clic se habilita la ventana para que copies el siguiente código:
Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Column = 2 and activeCell.Row > 2 Then 'ver (1)
fila = ActiveCell.Row - 1
With Worksheets("Hoja1").Cells(fila, 2) 'ver (2)
If .Value <> "" Then
Worksheets("Hoja1").Cells(fila, 4).Value = Time 'ver (3)
End If
End With
End If
End Sub
Aclaraciones:
(1) supone que el dato que llama la macro está en la columna B, si la querés en E será 5
(2) Reemplazar "Hoja1" por la que vas a usar. Otra vez donde dice 2 colocar el número de la columna donde se ingresa el dato.
(3) Otra vez reemplazar "Hoja1" si hiciera falta. El 4 significa que la hora se mostrará en la columna D. Si es H será 8
Guardá y cerrá el libro. Cuando lo abras ya estarás en condiciones de trabajarlo.
Cualquier duda volvé a escribirme, de lo contrario por favor no olvides de finalizar la consulta.
