Muy buenas, he programado muy poco en VBA y nos han encargado en el curro agilizar un proceso y sería mediante macros. Mi duda es ¿cómo se puede ir recorriendo el filtro de una tabla dinámica? Y para cada resultado, recorrer sus filas (que no en cada item del filtro es igual).

Me explico mejor: tengo el libro "Enero2016" con la tabla dinamica filtrada por proyectos, puedes elegir Proyecto1, Proyecto2, Proyecto3. Cada proyecto tiene varios programas prog1a, prog1b, ... prog1n, prog2a, ..., prog2m, etc. Y cada uno con sus datos, que son etiquetas de fila. Y luego Fecha de inicio, presupuesto, horas de trabajo y tal. Que son valores.

El objetio es una macro que recorra en "Enero2016" todo Proyecto1, recorra cada programa (fila), copie los valores y los lleve a otro archivo (cada Proyecto tendría el suyo). Lo mismo para Proyecto 2, etc.


Uno a uno se podría poner ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Proyecto").CurrentPage = "Proyecto1" y así para todos, pero no es muy práctico si existe un bucle.

Muchas gracias!