Propriedade PivotTable.PreserveFormatting (Excel)
True se a formatação for preservada quando o relatório for atualizado ou recalculado por operações como pivotar, classificar ou alterar itens de campo de página.
Para tabelas de consulta, essa propriedade será True se qualquer formatação comum às cinco primeiras linhas de dados for aplicada a novas linhas de dados na tabela de consulta. Células não utilizados não são formatadas.
A propriedade será False se a última AutoFormatação aplicada à tabela de consulta for aplicada às novas linhas de dados. O valor padrão é True.
Sintaxe
expressão. PreserveFormatting
Expressão Uma variável que representa um objeto de Tabela Dinâmica .
Comentários
Para tabelas de consulta de banco de dados, a configuração de formatação padrão é a constantexlSimple.
O novo estilo de AutoFormatação será aplicado à tabela de consulta quando a tabela for atualizada. A AutoFormatação será redefinida como None sempre que PreserveFormatting for definido como False. Como resultado, qualquer AutoFormat definido antes de PreserveFormatting é definido como False e antes que a tabela de consulta seja atualizada não entre em vigor e a tabela de consulta resultante não tenha nenhuma formatação aplicada a ela.
Exemplo
Este exemplo preserva a formatação do primeiro relatório de tabela dinâmica na planilha um.
Worksheets(1).PivotTables("Pivot1").PreserveFormatting = True
Este exemplo demonstra como definir PreserveFormatting como False faz com que o AutoFormat seja definido como o valor XlRangeAutoFormatxlRangeAutoFormatNone em vez do formato xlRangeAutoFormatColor1 especificado.
With Workbooks(1).Worksheets(1).QueryTables(1)
.Range.AutoFormat = xlRangeAutoFormatColor1
.PreserveFormatting = False
.Refresh
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.
Comentários
https://aka.ms/ContentUserFeedback.
Em breve: Ao longo de 2024, eliminaremos os problemas do GitHub como o mecanismo de comentários para conteúdo e o substituiremos por um novo sistema de comentários. Para obter mais informações, consulteEnviar e exibir comentários de