PivotCache.CreatePivotTable (Excel)
Cria um relatório de tabela dinâmica baseado em um objeto PivotCache. Retorna um objeto PivotTable.
Para obter uma maneira alternativa de criar um relatório de tabela dinâmica com base em um cache de tabela dinâmica, consulte o método Add do objeto PivotTables .
CreatePivotTable (TableDestination, TableName, ReadData, DefaultVersion)
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlExternal)
.Connection = _
"OLEDB;Provider=MSOLAP;Location=srvdata;Initial Catalog=National"
.CommandType = xlCmdCube
.CommandText = Array("Sales")
.MaintainConnection = True
.CreatePivotTable TableDestination:=Range("A3"), _
TableName:= "PivotTable1"
End With
With ActiveSheet.PivotTables("PivotTable1")
.SmallGrid = False
.PivotCache.RefreshPeriod = 0
With .CubeFields("[state]")
.Orientation = xlColumnField
.Position = 1
End With
With .CubeFields("[Measures].[Count Of au_id]")
.Orientation = xlDataField
.Position = 1
End With
End With
Arguments
O seguinte argumento é necessário
TableDestination (PivotCache) - A célula no canto superior esquerdo do intervalo de destino do relatório de tabela dinâmica (o intervalo na planilha onde o relatório de tabela dinâmica resultante será colocado). O intervalo de destino deve estar em uma planilha na pasta de trabalho que contém o objeto PivotCache especificado pela expressão.
Optional arguments
Os seguintes argumentos são opcionais
TableName (String) - O nome do novo relatório de tabela dinâmica.
ReadData (Boolean) - True para criar um cache de tabela dinâmica que contenha todos os registros do banco de dados externo; esse cache pode ser muito grande. False para habilitar a configuração de alguns dos campos como campos de página com base em servidor antes dos dados serem lidos.
DefaultVersion - A versão padrão do relatório de tabela dinâmica