Fijar la fecha de hoy en una celda al tener una condición en otra celda.

Supongamos que hay 4 columnas, ustedes les van a dar un uso de control para tramites...

A1,B1,C1 y D1, donde:

A1= TIPO DE TRAMITE

B1= FECHA DE INICIO DEL TRAMITE

C1= FECHA DE TERMINO DEL TRAMITE

D1= ESTATUS DEL TRAMITE

¿Cuál es la cuestión?

Paso 1: Escribo el nombre del tramite en A1.

Paso 2: escribo la fecha del día de hoy en B1.

Paso 3: Deseo que al escribir el estatus en D1= "TERMINADO", quiero que en la celda C1 se ponga la fecha de hoy, pero que al día siguiente diga la fecha de ayer y al día siguiente la fecha de antier, lo que quiero decir es que se fije la fecha del día en que puse el estatus de "TERMINADO" y ya no se mueva.

¿Es posible esto?

1 Respuesta

Respuesta

[Hola 

Te paso la macro, lo pones en el evento change de tu hoja a utilizar

Private Sub Worksheet_Change(ByVal Target As Range)
'
'***Por Adriel Ortiz
'
If Not Intersect(Target, Range("D:D")) Is Nothing Then
If Target.Count > 1 Then Exit Sub
    If Target.Value = "TERMINADO" Then
        Cells(Target.Row, "C") = Date
    End If
    End If
End Sub

hay 2 opciones para finalizar bueno o Excelente saludos!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas