Excel - Crear macro para tratar filtros avanzados

Un saludo,

Estoy intentado hacer una macro que trabaje con filtros avanzados, en el momento de ejecutarla lo único que arroja es el encabezado de las columnas pero no los datos filtrados, no sé cuál sea el error:

Sub filtrer2()
'
' filtrer2 Macro
'

'
Range("A1:AB100").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
Range("A103:G109"), CopyToRange:=Range("A112"), Unique:=False
End Sub

Envio un archivo de ejemplo

Bendiciones

• ejemplo-macro-fa.zip(20,5 KB)

Tienes un problema y no es tuyo.

He realizado la siguiente acción:

- GRABAR MACRO.
- EJECUTAR FILTRO AVANZADO.
- FINALIZAR MACRO.

Y funciona correctamente. Limpio el resultado, ejecuto la macro y no funciona, es un BUG del Excel como otros muchos que hay.

Saludos.
\\//_

Es muy conocido lo que ocurre. Te explico:

- El problema lo tienes en el rango E104:E109.

- Tienes puestas unas "comas" como separador decimal cuando correspondían unos "puntos" (formato anglosajón).

- Lo anterior no es la única solución. También podrías poner (en la celda E104, por ejemplo) la siguiente fórmula:


La "coma" que ves en la fórmula deviene que yo (creo que al igual que tú) utilizo formato español.

¿Entendido?...
Saludos, Cacho R.

Realizado el cambio que propone Cacho y ya funciona la macro, pero no funciona de forma manual, lo dicho un BUG de Excel

Saludos.
\\//_

.
Por ello, Antoni, la segunda propuesta es superadora ya que "te independiza" de los problemas de configuración regional.

Un saludo, Cacho R.