Macro, filtro avanzado en tablas dinámicas protegidas
Para Dante:
Hola Dante,
Amigo, tengo una tabla en Excel (Base de dato). Con la cual genero dos (2) informe o resumen con tabla dinámica. Tanto la tabla en Excel, como las tablas dinámicas estan protegidas con contraseña "abc".
En las hojas de contenidos de tabla dinámicas agregue un rango de criterio para usar filtros avanzados en la búsqueda de líderes por departamento, un botón comando de consulta con macro asignada. A continuación macro usada.
Sub ConsultarOfensiva()
' Consultar Ofensiva Macro
' Macro para filtrar AVE, SLUG, AL,...
'
ActiveSheet. Unprotect "abc"
U = ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.Count).Row
Range("A7:X" & U).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Range("OfensivaGeneral!Criteria"), Unique:=False
ActiveSheet.Protect "abc"
End Sub
Esta macro funciona para algunos VALORES de búsqueda y para otros no, caso puntual funciona cuando quiero buscar el nombre de JUGADORES ; nombre de EQUIPOS, APARICIONES LEGALES (AL),
Anexo captura de pantalla de la tabla dinámica hoja " OfensivaGeneral " y Captura de pantalla de filtraje exitoso con VALOR de apariciones legales AL=5
Agradezco la revisión de la macro usada y defina el error o el problema existente
Saludos
Eduardo Gimenez
1 Respuesta
Los nombres de los títulos en los criterios debe ser exactamente iguales a los nombres de los títulos de tus datos, por ejemplo veo que en criterios tienes "Jugador" y en los datos tienes "JUGADOR". Revisa que no existan espacios antes o después de cada palabra, lo más práctico es copiar la fila de títulos de los datos en la fila de títulos de criterios.
Prueba nuevamente y me comentas.
¡Gracias!
Cosas del aprendizaje, tanto que revise la macro, la modifique.....etc....etc y nunca imagine ese detalles. Mil gracias por esa observación. Ahora si funciona al 100%
