Ver Mensaje Individual
  #1 (permalink)  
Antiguo 25/03/2007, 19:48
Avatar de Pablus00
Pablus00
 
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 21 años
Puntos: 11
Macro deshacer Filtro

Hola Colegas, hice un macro con un filtro que funciona correctamente, el problema surge cuando necesito volver atras el filtro para se muestren todos los registros.

Encontre este este codigo:

ActiveSheet.ShowAllData

Que me deshace el Filtro, pero ademas me muestra otras filas ocultas que tengo fuera del rango Filtrado.

Pense en volver a ocultar las filas que quiero ( las que estan lejos del filtro) como parte del macro para que vuelva a estar la hoja como al inicio:

ActiveSheet.ShowAllData
Rows("7:8").Select
Selection.EntireRow.Hidden = True

Pero no se si hay algun codigo que me permita volver atraz lo que se filtro, sin variantes. (pregunto esto por que son 2 mil registros, y para filtrar y desfiltrar demora una eternidad. Gracias!

PD: El Rango de Filtrado comienza desde la fila 12 en adelante (2000 reg aprox)
__________________
-- Nunca te des por vencido, aún vencido -- Web

Última edición por Pablus00; 26/03/2007 a las 12:26