Foro Excel

Que tal Foro?

Tengo una tabla donde solo debe existir 1 unico valor con el nombre de "Abierto"
por lo que de existir mas de 1 elemento con esta propiedad debo dejar como unico valor el "Abierto" mas actual segun su fecha! y los que esten abiertos deben cambiar a "Cerrado"

Alguien podria colaborarme con esto?

Adjunto un archivo de ejemplo.

De ante mano agradezco vuestra colaboración!

Hola.

Puedes probar con una macro y una celda auxiliar con una formula.

En F2 pones esta formula:

Código: Seleccionar todo

=MAX(INDICE((Tabla1[Estado]="Abierto")*(Tabla1[fecha]);))

En un modulo standar pones esta macro y la ejecutas

Código: Seleccionar todo

Sub cambiar()
Dim ul As Long
ul = Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To ul
If Cells(i, 1) = "Abierto" And Cells(i, 3) = [F2] Then
Cells(i, 1) = "Abierto"
Else
Cells(i, 1) = "Cerrado"
End If
Next
End Sub


Un saludo.

Toledoman, gracias por tu aporte! lo he probado y funciona!
lo unico que me cambia todas las celdas con el valor de "Abierto" por "Cerrado"

Se puede hacer q reemplace a todas las celdas con fecha anterior y deje intacta a la celda "abierto" con fecha mas actual??

Gracias!

pd: adjunto archivo con tu aporte agregado.

Hola.

Me parece que el fallo esta en que la formula que te propuse la tienes que ubicar en la celda F2 no en F1, que es como lo tienes ahora.

Un saludo.

Pues tienes toda la razon!

Ahora lo voy a aplicar a mi archivo real y te comento cosas!

Muchas gracias!

Hola Toldeman!

podrias por favor dar una ojeada a esta nueva pregunta:

macros/urgente-error-t17098.html

Gracias de ante mano! es bastante urgente!