Incluir tabla dinamica en macro

[John Manuel Garzon]

Buenos dias:

Estoy tratando de generar una macro con un tabla dinamica, pero al ejecutarla me sale el siguiente error: "Se ha producido el error 5 en tiempo de ejecucion - Argumento o llamada a procedimiento no valida"

Me señala en amarillo el error:

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _

"Sheet1!F1C1:F4916C10", Version:=xlPivotTableVersion12).CreatePivotTable _

TableDestination:="Sheet1!F1C12", TableName:="Tabla dinámica1", _

DefaultVersion:=xlPivotTableVersion12

Agradezco me indiquen como debo proceder para la generación correcta de la macro.

Muchas gracias.

Saludos

[elunico22]

Hola:

Sube el archivo para poder ayudarte mejor, solo con mostrarnos el codigo es dificil de saber.

[John Manuel Garzon]

Hola [uSER=162796]@elunico22[/uSER], adjunto el archivo, muchas gracias, lo que quiero hacer es que la macro haga la TD con la columna Concatenar y la columna de Ctd Real despues de ejecutar la Macro 1.

Gracias

Consumos Junio 2015 V2.zip