Método PivotFilters.Add (Excel)

Adiciona novos filtros à coleção PivotFilters.

Sintaxe

expressão. Adicionar (Type, DataField, Value1, Value2, Order, Name, Description, MemberPropertyField, WholeDayFilter)

Expressão Uma variável que representa um objeto PivotFilters .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Type	Obrigatório	XlPivotFilterType	Requer um tipo de filtro XlPivotFilterType .
DataField	Opcional	Variantes	O campo ao qual o filtro é anexado.
Value1	Opcional	Variantes	Valor do filtro 1.
Value2	Opcional	Variantes	Valor do filtro 2.
Order	Opcional	Variantes	Ordem em que os dados devem ser filtrados.
Name	Opcional	Variantes	Nome do filtro.
Descrição	Opcional	Variantes	Uma breve descrição do filtro.
MemberPropertyField	Opcional	Variantes	Especifica o membro do campo de propriedade em que o filtro do rótulo se baseia.
WholeDayFilter	Opcional	Variantes	Especifica um filtro com base em dias.

Valor de retorno

PivotFilter

Exemplo

A seguir há alguns exemplos de como usar corretamente a função Add.

ActiveCell.PivotField.PivotFilters.Add FilterType := xlThisWeek 
 
ActiveCell.PivotField.PivotFilters.Add FilterType := xlTopCount DataField := MyPivotField2 Value1 := 10 
 
ActiveCell.PivotField.PivotFilters.Add FilterType := xlCaptionIsNotBetween Value1 := "A" Value2 := "G" 
 
ActiveCell.PivotField.PivotFilters.Add FilterType := xlValueIsGreaterThanOrEqualTo DataField := MyPivotField2 Value1 := 10000  

O exemplo seguinte retorna um erro em tempo de execução porque o tipo de dados Value1 é inválido.

ActiveCell.PivotField.PivotFilters.Add FilterType := xlValueIsGreaterThanOrEqualTo DataField := MyPivotField2 Value1 := Allan  

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.