Cuando necesitamos crear una Tabla Dinámica con macro en Excel, desde la grabadora de macros, se produce un error.
Mostrándose dos posibles errores:
Error en tiempo de ejecución '1004': error definido por la aplicación.
Error de tiempo de ejecución '5': argumento o llamada a procedimiento no válido.
Grabar la macro para la tabla dinámica.
Pulsar la tecla Alt y mantener pulsada
Pulsar la tecla F11. Mostrará el editor de Visual Basic.Ir al Explorador de proyecto
Módulos Doble clic sobre: Módulo1. Mostrará el código de la macro similar a:Sub Macro 1()
'
' Macro1 Macro
'Sheets.Add
ActiveWorkbook.Worksheets("Hoja5").PivotTables("Tabla dinámica2").PivotCache. _
CreatePivotTable TableDestination:="Hoja2!R3C1", TableName:= _
"Tabla dinámica1", DefaultVersion:=xlPivotTableVersion14
Sheets("Hoja2").Select
Cells(3, 1).Select
End Sub
Eliminar la línea 5:
Sheets.Add
Eliminar las líneas 9 y 10:
Sheets("Hoja2").Select
Cells(3, 1).Select
Modificar en línea 7:
Original: TableDestination:="Hoja2!R3C1"
Cambiar a: TableDestination=""El código de la macro quedará similar a:
Sub Macro 1()
'
' Macro1 Macro
'ActiveWorkbook.Worksheets("Hoja5").PivotTables("Tabla dinámica2").PivotCache. _
CreatePivotTable TableDestination:="", TableName:= _
"Tabla dinámica1", DefaultVersion:=xlPivotTableVersion14
End Sub
Guardar el libro con la extensión *.xlsm. Libro habilitado para macros.
Reproducir la macro y verificar como no muestra los errores, de la grabadora de macros.
Así podemos crear una tabla dinámica con macro en Excel con la grabadora.
Excel Experto VBA - Macros- Consultar:
