Agregar campos a tablas dinámicas
Hola,
Necesito saber como puedo agregar campos a una tabla dinámica a través de código VBA.
Los campos que quiero añadir son campos que pueden tener algún resultado o no dependiendo del mes, esto es para evitar que se me descuadren las tablas dinámicas y así opder asociar las celdas con otras de otro libro para poder presentar un informe. No se si esta muy claro si no es así comentarlo...
Muchas gracias,
Necesito saber como puedo agregar campos a una tabla dinámica a través de código VBA.
Los campos que quiero añadir son campos que pueden tener algún resultado o no dependiendo del mes, esto es para evitar que se me descuadren las tablas dinámicas y así opder asociar las celdas con otras de otro libro para poder presentar un informe. No se si esta muy claro si no es así comentarlo...
Muchas gracias,
1 Respuesta
Respuesta de villaju
1
La verdad es que sólo he entendido bien la primera parte:Cómo agregar campos a una tabla dinámica a través de código VBA(el resto de tu pregunta, la verdad, no entendí).
Bien, aquí te doy el código: imagina que el campo que quieres agregar se llama "Cliente":
ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("CLIENTE").Orientation = Lugar.
Reemplaza "lugar" por alguna de las siguientes palabras:
XlColumnField si quieres que se coloque en CampoColumna
xlPageField como CampoPagina
xlRowField como campoFila
xlDataField como CampoDatos.
Espero haber acertado en lo que pretendías, si es así, por favor, no olvides finalizar la pregunta. Pero si te queda cualquier duda, preguntame, y con gusto te ayudo.
Bien, aquí te doy el código: imagina que el campo que quieres agregar se llama "Cliente":
ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("CLIENTE").Orientation = Lugar.
Reemplaza "lugar" por alguna de las siguientes palabras:
XlColumnField si quieres que se coloque en CampoColumna
xlPageField como CampoPagina
xlRowField como campoFila
xlDataField como CampoDatos.
Espero haber acertado en lo que pretendías, si es así, por favor, no olvides finalizar la pregunta. Pero si te queda cualquier duda, preguntame, y con gusto te ayudo.
Te recuerdo que tienes la pregunta sin finalizar. Si te queda alguna duda, vuelve a preguntarme y con gusto te ayudo. Sino.
Si un experto tiene muchas preguntas sin finalizar, queda inhabilitado para seguir contestando. Por eso es importante que la finalices, hiciste una pregunta, y alguien se tomó la molestia de ayudarte, ahora sólo te costará 10 segundos devolver el favor, quien sabe, quizás un día necesites de nuevo este foro, sería una pena que alguien no pudiera contestarte.
