Thanks Thanks:  0
Likes Likes:  0
Results 1 to 2 of 2

Thread: Filtro sin flechas de lista desplegable

  1. #1
    Board Regular
    Join Date
    Jun 2002
    Location
    España
    Posts
    52
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    Me gustaria aplicar un filtro por codigo VBA y que no salgan las flechas de lista desplegable en todos los titulos.

    Solo he logrado quitarla en la columna de la condicion:
    Range("A1").AutoFilter 5, "Juan", VisibleDropDown:=False

    Y de manera lenta y poco elegante en todas las demas:
    Range("A1").AutoFilter 1, VisibleDropDown:=False
    Range("A1").AutoFilter 2, VisibleDropDown:=False
    Range("A1").AutoFilter 3, VisibleDropDown:=False
    Range("A1").AutoFilter 4, VisibleDropDown:=False
    Range("A1").AutoFilter 6, VisibleDropDown:=False

    alguien sabe un método directo y rapido para quitar las flechas de los demas titulos de las columnas?

    Gracias

  2. #2
    MrExcel MVP
    Join Date
    Feb 2002
    Location
    Bogota, Colombia
    Posts
    11,959
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default

    La verdad no conozco un método más rápido, pero lo que se puede hacer es un ciclo, así:

    Sub T()
    Dim i As Integer
    For i = 1 To ActiveSheet.AutoFilter.Range.Columns.Count
    If i = 1 Then
    ActiveSheet.AutoFilter.Range.AutoFilter i, 5, VisibleDropDown:=False
    Else
    ActiveSheet.AutoFilter.Range.AutoFilter i, VisibleDropDown:=False
    End If
    Next i
    End Sub


    Aquí lo importante es la condición del i = 1, en la que si es cierto, pongo la condición del filtro, y si no, lo único que se hace es desaparecer la flecha.
    Regards,

    Juan Pablo González
    http://www.juanpg.com

Some videos you may like

User Tag List

Like this thread? Share it with others

Like this thread? Share it with others

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •