Autofiltro Criteria1="Terminada" por Macro Excel
Hola buenas, quisiera hacer un autofiltro con el siguiente código que capture:
ActiveSheet.Range("$O$1:$O$" & ul).AutoFilter Field:=fly, Criteria1:="<>TERMINADA", Operator:=xlFilterValues.Este codigo supuestamente debería filtrar todo menos "TERMINADA". La cuestión es que no me sale. En la columna status, tengo varios estados: CERRADA , EN EJECUCIÓN, TERMINADA.
Lo que deseo es filtrar todos los estados excepto TERMINADA y lo que salga eliminar las filas.
Gracias
1 Respuesta
Respuesta de Dante Amor
1
Supongo que ul tienes el dato de la última fila de la columna O y en fly tienes el valor 1, debe ser 1 ya que solamente estás filtrando una columna, entonces deberías tener así:
Sub x()
ul = Range("O" & Rows.Count).End(xlUp).Row
fly = 1
ActiveSheet.Range("$O$1:$O$" & ul).AutoFilter Field:=fly, Criteria1:="<>TERMINADA", Operator:=xlFilterValues
End SubDe esa forma sí funciona.
Prueba y me comentas.
Saludos. Dante Amor
Si es lo que necesitas.
