¿Como detectar columna con filtro activado?

Tengo una tabla con 250 columnas. En ocasiones al utilizar el filtro olvido quitarlo. Al volver a utilizar la tabla lleva mucho tiempo encontrar la columna filtrada.

¿Cómo encontrar de forma rápida esa columna?

1 Respuesta

Respuesta
1

Sería algo así:

   Dim Sht As Worksheet
   Dim i As Long
   Set Sht = ActiveSheet
   With Sht.AutoFilter
      For i = 1 To .Filters.Count
         If .Filters(i).On Then
            MsgBox .Range(1, i).Column
         End If
      Next i
   End With

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas