A possibilidade de remover campos da Tabela Dinâmica permitirá uma performance mais fluída durante algumas ações de manutenção da mesma. Tais campos podem ser reinseridos posteriormente.
Sub RemovePivotField()'PURPOSE: Remove a field from a Pivot Table'Removing Filter, Columns, RowsActiveSheet.PivotTables("PivotTable1").PivotFields("Ano").Orientation = xlHidden'Removing ValuesActiveSheet.PivotTables("PivotTable1").PivotFields("Soma dos Salários").Orientation = xlHiddenEnd Sub
Veja outros códigos:
Série DONUT PROJECT 2021
Série DONUT PROJECT 2018
Série DONUT PROJECT 2015
Série DONUT PROJECT 2014
Clique aqui e nos contate via What's App para avaliarmos seus projetos
Envie seus comentários e sugestões e compartilhe este artigo!
brazilsalesforceeffectiveness@gmail.com
Nenhum comentário:
Postar um comentário