Clase PivotFilters (Excel VBA)

El objeto PivotFilters es una colección de objetos PivotFilter .

Para usar una variable de clase PivotFilters, primero debe ser instanciado, por ejemplo

Dim pfs as PivotFilters
Set pfs = ActiveCell.PivotTable.ActiveFilters

Los siguientes procedimientos se pueden usar para establecer variables de clase PivotFilters : PivotField.PivotFilters y PivotTable.ActiveFilters.

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos PivotFilters en una colección.

Dim pvtfil As PivotFilter
For Each pvtfil In ActiveCell.PivotTable.PivotFilters
	
Next pvtfil

Add2

Add2 (Type, DataField, Value1, Value2, Order, Name, Description, MemberPropertyField, WholeDayFilter)

Dim pvtfilAdd2 As PivotFilter
Set pvtfilAdd2 = ActiveCell.PivotTable.ActiveFilters.Add2(Type:=xlAfter)

Arguments

Un argumento con nombre

Type - XlPivotFilterType


Aquí puede ver valores posibles para

XlPivotFilterType

Optional arguments

Los siguientes argumentos son opcionales

DataField

Value1

Value2

Order

Name - String

Description - String

MemberPropertyField

WholeDayFilter

Count

Devuelve la cantidad de elementos que se incluyen en la colección PivotFilters.

Dim lngCount As Long
lngCount = ActiveCell.PivotTable.ActiveFilters.Count

Item

Devuelve un elemento específico del objeto de colección PivotFilters por su posición en la colección.

Item (Index)

Index: Especifica la posición de un elemento de la colección.

Dim pvtfilItem As PivotFilter
Set pvtfilItem = ActiveCell.PivotTable.ActiveFilters(Index:=1)