Automatizar el registro de expedientes en excel
Hola, necesito crear un registro de entrada y salida de expedientes, me gustaría que yo unicamente registrara el nº de expte. Y automáticamente me aparezca en las columnas B y C la hora y fecha en que mecanizo el expte. Pero sin que se actualice al volver a entrar al día siguiente.
1 Respuesta
Respuesta de Eduard Caballero
1
Con macros puedes hacer eso con este código
Private Sub Worksheet_Change(ByVal Target As Range)
datos = "B5"
If Not Application.Intersect(Target, Range(datos)) Is Nothing Then
'mostramos un mensaje
Range("c5") = Date
Range("d5") = Time
End If
End Sub
Lo pegas en la hoja donde colocaras el expediente. Como ejemplo al cambiar la celda b5 agregara en c5 y d5 fecha y hora
Private Sub Worksheet_Change(ByVal Target As Range)
datos = "B5"
If Not Application.Intersect(Target, Range(datos)) Is Nothing Then
'mostramos un mensaje
Range("c5") = Date
Range("d5") = Time
End If
End Sub
Lo pegas en la hoja donde colocaras el expediente. Como ejemplo al cambiar la celda b5 agregara en c5 y d5 fecha y hora
