CubeField? Configurando Valores de Filtro na Tabela Dinâmica - Excel, VBA, Tabela Dinâmica

Eu tenho um arquivo excel com várias macros. Neste arquivo existe uma tabela dinâmica com uma coluna chamada "Cliente", que contém vários elementos (milhares). O que eu quero saber é, existe alguma maneira eficiente de configurar o filtro desta coluna para valores específicos?

A razão pela qual eu estou perguntando é porque o spreadA planilha pedirá ao usuário para selecionar alguns clientes, que são armazenados em uma matriz, eu quero pegar os valores nessa matriz e filtrar a tabela dinâmica de acordo.

Consegui fazer isso fazendo o loop da tabela dinâmica em todos os itens, tornando-os visible = falsee, em seguida, fazendo aqueles que foram selecionados, visible = true. No entanto, o problema com essa abordagem é que leva muito tempo para processar.

Eu vi alguns exemplos na web de pessoas usando o CubeField opção, no entanto, não tenho certeza de como usá-lo? A sintaxe é um pouco complexa, eu tentei o seguinte e isso me dá um erro:

Worksheets("Analysis").PivotTables("PivotTable1").PivotFields("Supplier_Code").ClearAllFilters
Worksheets("Analysis").PivotTables("PivotTable1").PivotFields("Supplier_Code").CubeField.EnableMultiplePageItems = True
Set pt = Worksheets("Analysis").PivotTables("PivotTable1")
With PT
pt.PivotFields("[PivotTable1].[Supplier_Code]").VisibleItemsList = Array("[PivotTable1].[Supplier_Code].&[106214]", "[PivotTable1].[Supplier_Code].&[101160]") " ===>

Aqui eu não estou usando os valores da matriz, apenas tentando definir os clientes diretamente, 1 código de fornecedor é 106214 e o outro é 101160.

Qualquer ajuda para me levar na direção certa serámuito apreciado. Além disso, por favor, note que não estou olhando para definir o filtro para 1 item apenas, eu sou capaz de fazer isso sem problemas, o problema aqui é selecionar vários valores de uma vez, sem loop embora todos os valores possíveis que poderiam ser selecionado.

Respostas:

Quando sua tabela dinâmica é selecionada, na parte superiormenu, vá para "Ferramentas de tabela dinâmica" e "Opções", em seguida, escolha "Insert Slicer" da faixa de opções. Esse recurso faz o que você deseja - permite que você selecione facilmente filtros (um de cada vez ou vários) e veja os diferentes resultados da Tabela Dinâmica.