Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Tirar seleção de to...
 
Notifications
Clear all

Tirar seleção de todos os itens de uma Tabel Dinâmica

 
2024 - VBA & Macros
2 Posts
1 Usuários
0 Reactions
1,193 Visualizações
RSS
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Ola,
Eu gostaria de saber se tem algum código que tira a seleção de todos os itens de uma tabela dinâmica, eu tentei gravar uma macro para isso, mas na mão o excel não deixa que fiquem todos os itens sem pelo menos um selecionado e eu não queria utilizar o .PivotItems("").Visible = False já que são mais de 200 itens, tem alguma forma mais rápida?
Eu tentei várias maneiras mas não consegui, inclusive: ActiveSheet.PivotTables(1).ClearAllItems mas ele não aceitou, alguém pode me ajudar?

Obrigado e Bom Carnaval!

 
Postado : 08/03/2011 9:45 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Depende do que voce pretende.

Se pretende desmarcar os items, voce não pode exclui-los e sim, marcar todos

Use a propriedade CurrentPage e defina o valor como (All)

Exemplo

ActiveSheet.PivotTables("Tabela dinâmica1").PivotFields("NomeCampo").CurrentPage = "(All)"
 
Postado : 31/03/2011 2:46 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico