En la celda A código en la celda B fecha automática pero solo si la celda A son datos sin repetir
En un excel quisiera que me ponga la fecha del dato ingresado:
A b
codigo fecha
001'100 que ponga la fecha y hora automática
023'322 que ponga la fecha y hora automática
Hasta hay estoy bien pero lo que me falta es que si tiene dato repetido no ponga fecha
002'100 fecha y hora automatica
002'100 que no ponga nada
003'122 fecha automatica
004'123 fecha automatica
002'100 que no ponga nada
Así quisiera que funcione
1 respuesta
Respuesta de Dante Amor
2
Pon la siguiente macro en los eventos de tu hoja
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Not Intersect(Target, Range("A:A")) Is Nothing Then
If Target.Count > 1 Then Exit Sub
If Target.Value = "" Then
Cells(Target.Row, "B") = ""
Else
valor = Target.Value
cuenta = WorksheetFunction.CountIf(Columns("A"), valor)
If cuenta = 1 Then
Cells(Target.Row, "B") = Now
End If
End If
End If
End SubSigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
- En el panel del lado derecho copia la macro
.
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
.
Avísame cualquier duda
.
