Borrar celdas de columnas que se auto-completaron con la fecha, al momento de ingresar datos en otra.
Tengo la siguiente macro que autocompleta la hora al cambiar el estado de otra. Necesito que en caso que el dato ingresado sea borrado, también se borre el auto completado.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Value = "Resuelto" Then
Sheets("Registro").Cells(Target.Row, 9) = Format(Now(), "dd-mm-yyyy")
End If
End Sub
1 respuesta
Respuesta de Abraham Valencia
1
[Hola
No estoy seguro pero creo que esto es lo que buscas:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 And Target.Value = "Resuelto" Then
Sheets("Hoja1").Cells(Target.Row, 9) = Format(Now(), "dd-mm-yyyy")
ElseIf Target.Column = 3 And Target.Value = "" Then
Sheets("Hoja1").Cells(Target.Row, 9) = ""
End If
End SubComentas
Abraham Valencia
