Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Verdadeiro se o Microsoft Excel usar uma grade com duas células de largura e duas células de profundidade para um relatório de Tabela Dinâmica recém-criado. False se o Excel usar um contorno estêncil em branco. Boolean de leitura/gravação.
Sintaxe
mais simples. SmallGrid
expressão Uma variável que representa um objeto de Tabela Dinâmica .
Comentários
Você deve usar o contorno estêncil. A grade é fornecida somente porque ativa a compatibilidade com as versões anteriores do Excel.
Exemplo
Este exemplo cria um novo cache de Tabela Dinâmica com base em um provedor OLAP e, em seguida, cria um novo relatório de Tabela Dinâmica com base nesse cache na célula A3 da planilha ativa. O exemplo usa o contorno estêncil em vez da grade de célula.
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlExternal)
.Connection = _
"OLEDB;Provider=MSOLAP;Location=srvdata;Initial Catalog=National"
.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 = 0
End With
With .CubeFields("[Measures].[Count Of au_id]")
.Orientation = xlDataField
.Position = 0
End With
End With
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.