[RESUELTO] macro de filtro automático en varias columnas
Publicado: Mar Nov 27, 2018 12:02 pm
saludos ,
Tengo un archivo con Auto Filtros en la hoja de cálculo 1.
los filtros van de la columna "A" a la columna "AZ" colocados en la línea 1.
deseo utilizar una macro para filtrar múltiples columnas al mismo tiempo.
intenté adaptar el siguiente código para hacer esta operación, pero no tuve éxito.
codigo fuente : https://stackoverflow.com/questions/465 ... able-array
========================================================
Dim APR As String
Dim MAY As String
Dim arr1(0 To 1) As String
APR = "APR"
MAY = "MAY"
arr1(0) = APR
arr1(1) = MAY
Worksheets("Filter").Range("$A:$H").AutoFilter Field:=2, _
Criteria1:=arr1, Operator:=xlFilterValues
========================================================
meta :
utilizar el código fuente para filtrar al mismo tiempo por ejemplo : Field: = 2 y Field: = 5 y Field: = 8 y Field: = 11 ... y ... así sucesivamente .
abrazos
Tengo un archivo con Auto Filtros en la hoja de cálculo 1.
los filtros van de la columna "A" a la columna "AZ" colocados en la línea 1.
deseo utilizar una macro para filtrar múltiples columnas al mismo tiempo.
intenté adaptar el siguiente código para hacer esta operación, pero no tuve éxito.
codigo fuente : https://stackoverflow.com/questions/465 ... able-array
========================================================
Dim APR As String
Dim MAY As String
Dim arr1(0 To 1) As String
APR = "APR"
MAY = "MAY"
arr1(0) = APR
arr1(1) = MAY
Worksheets("Filter").Range("$A:$H").AutoFilter Field:=2, _
Criteria1:=arr1, Operator:=xlFilterValues
========================================================
meta :
utilizar el código fuente para filtrar al mismo tiempo por ejemplo : Field: = 2 y Field: = 5 y Field: = 8 y Field: = 11 ... y ... así sucesivamente .
abrazos