1
Crear una nueva hoja de cálculo de Excel. Si está utilizando Microsoft Excel 2007 o posterior , vaya a la pestaña "Ver " en la cinta de opciones y haga clic en " Macros , " si usted está utilizando una versión anterior de Excel , haga clic en el menú " Herramientas" , vaya a " Macro" y haga clic en " Macros ". Con ello se abre el cuadro de diálogo Macro .
2 Escriba un nuevo nombre de la macro y haga clic en " Crear". Usted debe ver el editor de Visual Basic para Aplicaciones aparecen con una nueva subrutina con el nombre que haya elegido
3
Agregue código para recuperar una referencia a la hoja de cálculo : .
Set hoja = ThisWorkbook.Worksheets ( 1 )
Si los datos no está en la primera hoja del libro , cambie el número anterior entre 1 y el índice de la hoja de cálculo que contiene los datos.
4
Determinar el rango de los datos que se utilizarán en la tabla dinámica : rango Set
= worksheet.UsedRange
5
Cree el objeto de tabla dinámica :
< p> worksheet.PivotTableWizard ( SourceType : = xlDatabase , SourceData : = rango , TableDestination : = worksheet.Range ( " B5 " ))